Telnet Sonderzeichen Problem bei einer if abfrage

[ConnorMcLeod]

Delphi-Quellcode:

function MakeHexString(S: String): string;
var CopyS : String;
    j : Integer;
begin
  for j := 1 to Length(S) do begin
    CopyS := Copy(S,j,1);
    if CopyS <> '' then
      Result := Result + ' ' + Format('%2.2x',[Byte(CopyS[1])])
    else
      Result := Result + '   ';
  end;
end;

Damit kannst Du Dir den String in Hex anschauen. Dann wird gleich klar, welches Zeichen es ist.

HTH Wolfgang