Q&A
- CPort2.64를 사용하여 232로 들어 오는 데이터를 처리하는데 $00 값은 삭제 되어서 들어 오는데?
소스:
function HexDisplay(sStr : String) : String;
var
sTmp,sHex : String;
i : integer;
begin
sTmp :='';
for i:=1 to Length(sStr) do
begin
sHex := Format('%x',[byte(sStr[i])]);
if Length(sHex) = 1 then sTmp := sTmp + '$0'+ sHex
else sTmp := sTmp +'$' + sHex;
end;
Result := sTmp;
end;
procedure TMain.ComPortRxChar(Sender: TObject; Count: Integer);
var
Str : String;
begin
ComPort.ReadStr(Str, Count);
Edit1.Text := HexDisplay(Str);
end;
해서 값을 값을 추출해서 보면 보낸값은 $03$02$00$04$1F 로 보내면 $03$02$04$1F 값 즉 $00값이 빠진 것만 들어 옵니다.
function HexDisplay(sStr : String) : String;
var
sTmp,sHex : String;
i : integer;
begin
sTmp :='';
for i:=1 to Length(sStr) do
begin
sHex := Format('%x',[byte(sStr[i])]);
if Length(sHex) = 1 then sTmp := sTmp + '$0'+ sHex
else sTmp := sTmp +'$' + sHex;
end;
Result := sTmp;
end;
procedure TMain.ComPortRxChar(Sender: TObject; Count: Integer);
var
Str : String;
begin
ComPort.ReadStr(Str, Count);
Edit1.Text := HexDisplay(Str);
end;
해서 값을 값을 추출해서 보면 보낸값은 $03$02$00$04$1F 로 보내면 $03$02$04$1F 값 즉 $00값이 빠진 것만 들어 옵니다.
2
COMMENTS
-
-
Memo1.Lines.add(sHex); // 이렇게 찍어보세요..달라진 결과를 보실겁니다.
(NOTICE) You must be logged in to comment on this post.
-
- 오명석
- 2004.01.07 07:30
- 0 COMMENTS
- /
- 0 LIKES
-
- 진돌
- •
- 2004.01.07 06:15
- 1 COMMENTS
- /
- 0 LIKES
-
연기훈•2004.01.09 23:19아래 소스는 String Grid 에서 셀별로 텍스트 정렬을 해주는 건데여.. 0 : 왼쪽 정렬, 1 : 가운데 정렬,...
-
- 색기발랄
- 2004.01.07 04:10
- 0 COMMENTS
- /
- 0 LIKES
-
-
너구리•2004.01.07 20:52어떤 DBMS인지는 모르겟지만 oracle은 select * from tab 으로 확인 할수 잇습니다. 다른 디비라면 ...
-
-
- 김연재
- •
- 2004.01.07 03:51
- 1 COMMENTS
- /
- 0 LIKES
-
색기발랄•2004.01.07 04:45인터베이스 DB 파일입니다. 인터베이스는 델파이 설치시 같이 설치됩니다.
-
- 색기발랄
- •
- 2004.01.07 03:50
- 1 COMMENTS
- /
- 0 LIKES
-
너구리•2004.01.07 20:47무엇을 이용하여 검색을 하셨는지는 모르겠지만.. 제생각엔 제대로 값은 들어갔는데.. 검색하는곳에...
-
- 신기배
- 2004.01.07 03:29
- 0 COMMENTS
- /
- 0 LIKES
-
- 이상민
- •
- 2004.01.07 02:46
- 1 COMMENTS
- /
- 0 LIKES
-
hello•2004.02.04 23:22방법은 여러가지 가 있겠
-
- 강유원
- 2004.01.07 00:45
- 0 COMMENTS
- /
- 0 LIKES
-
- 김지영
- •
- 2004.01.07 00:15
- 1 COMMENTS
- /
- 0 LIKES
-
너구리•2004.01.07 21:03compositereport라고 있을겁니다. 퀵리포트를 두개이상을 합쳐서 구성하게끔 되어있어요.. 해보지는 ...
-
- 김정모
- 2004.01.06 22:56
- 0 COMMENTS
- /
- 0 LIKES
-
- 나원호
- 2004.01.06 22:55
- 0 COMMENTS
- /
- 0 LIKES
-
- 조우택
- •
- 2004.01.06 22:45
- 2 COMMENTS
- /
- 0 LIKES
-
이희진•2004.01.07 05:32TDM : Transaction Data Module RDM : Remote Data Module 으로 줄여 부르겠습니다. 기본적인 골격은 ...
-
조우택•2004.01.07 18:05^^
-
- 박제홍
- •
- 2004.01.06 20:50
- 1 COMMENTS
- /
- 0 LIKES
-
연기훈•2004.01.09 23:09쿼리나 테이블 컴포에 Field가 이름이 들어가있어야 합니다. 컴포넌트 더블 클릭하면 나온느 Field 정보...
-
- 공호준
- •
- 2004.01.06 19:31
- 2 COMMENTS
- /
- 0 LIKES
소스: function HexDisplay(sStr : String) : String; var sTmp,sHex : String; i : integer; begin sTmp :=''; for i:=1 to Length(sStr) do begin sHex := Format('%x',[byte(sStr[i])]); if Length(sHex) = 1 then sTmp := sTmp + '$0'...-
이성진•2004.01.06 23:46TComport의 Properties중에 DiscardNull이 혹시 True로 되어 있는게 아닌지..
-
백털성물•2004.01.06 19:56Memo1.Lines.add(sHex); // 이렇게 찍어보세요..달라진 결과를 보실겁니다.
-
- 김정모
- 2004.01.06 19:23
- 0 COMMENTS
- /
- 0 LIKES
-
- 정윤호
- 2004.01.06 18:21
- 0 COMMENTS
- /
- 0 LIKES
-
- 이종철
- 2004.01.06 17:48
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁금이
- 2004.01.06 16:49
- 0 COMMENTS
- /
- 0 LIKES
-
- 푸른하늘
- 2004.01.06 09:03
- 0 COMMENTS
- /
- 0 LIKES
TComport의 Properties중에
DiscardNull이 혹시 True로 되어 있는게 아닌지..