"Komische" HEX-Codes

[Tumm]

Thx

Es funktioniert:

Delphi-Quellcode:

var
s:String;
P:Char;
begin
 try
  s := ser.RecvPacket(50); //Fragt den COM-Port ab
 except
  s := '';
 end;
  if length(s) > 0 then begin
    Memo1.Lines.Add(s); //Schreibe "das Zeichen" ins Log
    p := s[1]; //Speichert das erste Zeichen in P
    Memo1.Lines.Add(IntToStr(ord(p))); //Schreibe den Zeichencode ins Log
end;