[DUG] Delphi Digest, Vol 94, Issue 7

[Marshland Engineering]

I still have something wrong

I sending
    serial_send('B');
    serial_send('C');
and a terminal program reads BC correctly

My Delphi code is as below but something is wrong with the second character.

    if SerialPortNG.NextClusterSize >= 0 then begin
       sRaw:=SerialPortNG.ReadNextClusterAsString;
       memo1.Lines.Add(sRaw);
       sData:='';
       for i:=1 to length(sRaw) do begin
           iValue:= ORD(sRaw[i]);
           sData:=sData+IntToStr(iValue)+'  ';
        end;
       memo1.Lines.Add(sData);

Result
Bè
66  232
Bè
66  232
Bè
66  232