델을 시작한지 2개월 된,
SERIAL 통신을 배우는 초보입니다.
아래와같은 코딩인데
메모장에는 정상적으로 완전한 TEXT문장이 출력되는데
화일로 저장시킬때는 문자로 8자씩 잘려서 기록합니다.
어디가 틀렸습니까?
begin
Comm1.ReceiveBuf(Buff[0], Count, Rlen);
Str := '';
for I := 0 to RLen -1 do begin
if (Buff[I] < ' ') or (Buff[I] >= #127) then
Str := Str+#13#10
else
Str := Str + String(Buff[I]);
end;
Memo1.SelStart := Length(Memo1.Text);
Memo1.SelText := String(Str);
AssignFile(FH,'c:delptdd.txt');
Append(FH);
Writeln(FH,STR);
CloseFile(FH);
end;