Q&A
- Char 값을 바로 HEX값으로 변환하는법 알려주세요.
var
S: String;
A: array[0..8] of Char;
KeyValue: array[0..8] of integer;
i: Integer;
begin
S := 'ABCDEFGH'; // S 의값이 Ascii 128보가 큰값이 들어옴//
StrPCopy(A, S);
for i := 0 to 8 do
begin
KeyValue[i] := Ord(A[i]);
if KeyValue[i] > 128 then // Ascii 128보가 큰값 때문에 처리 //
KeyValue[i] := KeyValue[i] - 128;
A[i] := Chr(KeyValue[i]);
end;
end;
// 이렇게하면 문자형까지 변환이 되는데여... 핵사 값으로는 ? 하는지...
S: String;
A: array[0..8] of Char;
KeyValue: array[0..8] of integer;
i: Integer;
begin
S := 'ABCDEFGH'; // S 의값이 Ascii 128보가 큰값이 들어옴//
StrPCopy(A, S);
for i := 0 to 8 do
begin
KeyValue[i] := Ord(A[i]);
if KeyValue[i] > 128 then // Ascii 128보가 큰값 때문에 처리 //
KeyValue[i] := KeyValue[i] - 128;
A[i] := Chr(KeyValue[i]);
end;
end;
// 이렇게하면 문자형까지 변환이 되는데여... 핵사 값으로는 ? 하는지...
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- zerodog
- •
- 2001.02.12 04:04
- 1 COMMENTS
- /
- 0 LIKES
-
초보•2001.02.12 18:39zerodog wrote: > formatfloat('###,###,###',Float형 변수) > 이런식으로 쓰면된다고 하는데여... 제가 ...
-
- 장우석
- •
- 2001.02.12 03:25
- 1 COMMENTS
- /
- 0 LIKES
var S: String; A: array[0..8] of Char; KeyValue: array[0..8] of integer; i: Integer; begin S := 'ABCDEFGH'; // S 의값이 Ascii 128보가 큰값이 들어옴// StrPCopy(A, S); for i := 0 to 8 do begin KeyValue[i] := Ord(A[i]); if K...-
홍세비•2001.02.12 19:38장우석 wrote: > var > S: String; > A: array[0..8] of Char; > KeyValue: array[0..8] of inte...
-
- 정일준
- •
- 2001.02.12 02:01
- 4 COMMENTS
- /
- 0 LIKES
-
델사랑•2001.04.11 01:21먼저 quickrep의 detailband에 QRLable을 가져다 놓습니다. 그리고 privete에서 j를 integer로 선언합니다...
-
델사랑•2001.04.11 01:18quickrep에 needdate에 간단한 코딩을 해주면 됩니다. 먼저 private 에서 i를 선언해줍니다. 그리고 b...
-
이종현•2001.02.12 04:03정일준 wrote: > 어떻게 해야 되죠??.. > > 온통 DB 연동해서 하는것 밖에 없네요.. > > 찾다찾다 ...
-
델사랑•2001.04.11 01:22먼저 quickrep의 detailband에 QRLable을 가져다 놓습니다. 그리고 privete에서 j를 integer로 선언합니다...
-
- hackdibs
- •
- 2001.02.11 21:30
- 1 COMMENTS
- /
- 0 LIKES
-
초보•2001.02.12 18:58hackdibs wrote: > 공부를 하다보니깐요.. > begin > Label1.Caption := '....'; > end; > 이...
-
- 이선주
- •
- 2001.02.11 11:13
- 3 COMMENTS
- /
- 0 LIKES
-
정대연•2001.02.14 01:40이선주 wrote: > 정말 이해가 안갑니다.저는 ADO를 써서 프로그램을 만들었는데 > 프로그램에서 하나는 ...
-
초보•2001.02.12 19:09이선주 wrote: > 정말 이해가 안갑니다.저는 ADO를 써서 프로그램을 만들었는데 > 프로그램에서 하나는 ...
-
나도초보•2001.02.12 18:53저도 초보라 도움이 될지 모르겠네요~ ^^; 전반적인 어떻게 코딩을 하셨는지 파악이 잘 안되서 잘 모르겠...
-
- 이영국
- 2001.02.11 05:21
- 0 COMMENTS
- /
- 0 LIKES
-
- 안명호
- 2001.02.11 04:05
- 0 COMMENTS
- /
- 0 LIKES
-
- 임호성
- •
- 2001.02.11 03:36
- 1 COMMENTS
- /
- 0 LIKES
-
서록•2001.02.11 20:00미국에 있는 서버로 연결되기 위해선 미국과 케이블이 연결되어 있겠죠? 외국으로 연결하기 위해서 그렇기...
-
- eewook
- •
- 2001.02.11 01:46
- 2 COMMENTS
- /
- 0 LIKES
-
서록•2001.02.11 19:54POSUSB 드라이버를 이용하시면 간단합니다. 물론 HID를 이용하시는것두 있지만 제어루틴들이 필요하게 되...
-
eewook•2001.02.14 06:57서록 wrote: > POSUSB 드라이버를 이용하시면 간단합니다. > 물론 HID를 이용하시는것두 있지만 제어루틴...
-
- 왕초보
- •
- 2001.02.11 00:58
- 2 COMMENTS
- /
- 0 LIKES
-
기상원•2001.02.11 06:59시리얼 통신으로 시스템 제어가 가능 하더군요.. 전.. 8051 하구 통신 을 해 봤습니다.. 19200 bps 정도 까...
-
최시영•2001.02.12 18:17컴퓨터 인터페이스 카드로 직접 보드의 어드레스랑..데이터도 제어 가능합니다... 이것으로 오슬로스코프...
-
- 델초보
- •
- 2001.02.11 00:56
- 3 COMMENTS
- /
- 0 LIKES
-
김기수•2001.04.06 08:32델초보 wrote: > 시리얼통신으로 LED를 제어할려구 합니다. > 시리얼케이블로 연결은 했는데, 연구자료로...
-
김기수•2001.04.06 08:35김기수 wrote: > 델초보 wrote: > > 시리얼통신으로 LED를 제어할려구 합니다. > > 시리얼케이블로 연결...
-
kylix•2001.02.11 01:20허허허~~ 질문이 너무 추상적이군요... 추상적인 답변을 할께요... LED가 어떤 신호에 응답해서 불이...
-
- 천사의 마을
- •
- 2001.02.10 23:34
- 2 COMMENTS
- /
- 0 LIKES
-
정대연•2001.02.14 02:04천사의 마을 wrote: > 다들 즐플하고 계시죠?? 기온도 많이 올라가고 낮잠자기에도 좋고, 특히 데이트하...
-
천사의 마을•2001.02.14 04:58대현님의 답변 감사드립니다!!!! 이제서야 게시물을 보고 감사인사 드리는점 죄송합니다. 플밍을하면서 ...
-
- 버드
- 2001.02.10 23:29
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁금증
- 2001.02.10 21:53
- 0 COMMENTS
- /
- 0 LIKES
-
- 이기준
- •
- 2001.02.10 21:38
- 1 COMMENTS
- /
- 0 LIKES
-
도지성•2001.02.11 09:11이기준 wrote: > winamp처럼 녹음시 이퀄라이져 기능은 어떻게 구현하나요? winamp 는 어떻게 하는지 ...
-
- 빙구
- 2001.02.10 21:14
- 0 COMMENTS
- /
- 0 LIKES
-
- 아보가드로
- •
- 2001.02.10 21:06
- 2 COMMENTS
- /
- 0 LIKES
-
major•2001.02.11 00:56아보가드로 wrote: > 두개의 table에서 읽어와서 출력을 하려고 합니다. 두 테이블은 전혀 연관이 없구 >...
-
아폴론•2001.02.10 23:57아보가드로 wrote: > 두개의 table에서 읽어와서 출력을 하려고 합니다. 두 테이블은 전혀 연관이 없구 >...
-
- 이수정
- 2001.02.10 20:08
- 0 COMMENTS
- /
- 0 LIKES
-
- sonwow
- •
- 2001.02.10 19:06
- 1 COMMENTS
- /
- 0 LIKES
-
정성훈•2001.02.10 22:24sonwow wrote: > ms-sql7.0 을 98에 설치후 > 98에서 클라이언트 접속방법좀 알려주세요...... 안녕...
-
- 안익환
- •
- 2001.02.10 19:03
- 1 COMMENTS
- /
- 0 LIKES
-
안익환•2001.02.10 19:40안익환 wrote: > 안녕하세요? > 처음 질문을 올립니다. 이렇게 올리게 된건 이곳을 게시판을 뒤져봐도 ...
> var
> S: String;
> A: array[0..8] of Char;
> KeyValue: array[0..8] of integer;
> i: Integer;
> begin
> S := 'ABCDEFGH'; // S 의값이 Ascii 128보가 큰값이 들어옴//
> StrPCopy(A, S);
> for i := 0 to 8 do
> begin
> KeyValue[i] := Ord(A[i]);
> if KeyValue[i] > 128 then // Ascii 128보가 큰값 때문에 처리 //
> KeyValue[i] := KeyValue[i] - 128;
> A[i] := Chr(KeyValue[i]);
> end;
> end;
> // 이렇게하면 문자형까지 변환이 되는데여... 핵사 값으로는 ? 하는지...
>
안녕하세여. 홍세빕니다.
이렇게 해보세염...
Label1.Caption := Format('0x%x',[Ord('a')]);