IdTelnet - Empfangene Daten anzeigen

[Sir Rufo]

Da der TE aber XE2 hat kann man auch sehr schön http://docwiki.embarcadero.com/Libra...ding.GetString benutzen

[user0815]

Ich konnte es jetzt nochmal testen, die Zeichen werden so in Klarschrift ausgegeben:

Delphi-Quellcode:

procedure TForm1.IdTelnetDataAvailable(Sender: TIdTelnet; const Buffer: TArray<System.Byte>);
var
  s : String;
begin
  SetString(s, PAnsiChar(@Buffer[0]), length(Buffer));
  // ...
end;

@Sir Rufo: Das hatte ich versucht, da kam bei mir nur Zeichen Kauderwelsch.

s := TEncoding.Unicode.GetString(Buffer); gibt die selben Zeichen aus wie: SetString(s, PWideChar(@Buffer[0]), length(Buffer) div 2); DANKE !