Ich habe es erstmal so gemacht wie von chaosben beschrieben, aber irgendwie kam da nie alles
ins memo was der Server geantwortet hat. Also hab ich das folgendermaßen gelöst:
Also erstmal prüfen ob die empfangenen Daten auch wirklich was zum eintragen ins Memo enthalten.
Wenn das der Fall ist, dann wird das ganze ins Memo eingetragen.
Delphi-Quellcode:
procedure TClient.telnetDataAvailable(Sender: TIdTelnet;
const Buffer: TIdBytes);
begin
if Trim(BytesToString(Buffer))='' then exit else
AddStatus(BytesToString(Buffer));
end;
Der übergebene Wert wird hiermit schlichtweg ins Memo geschrieben. Ich fand diesen Umweg etwas
übersichtlicher weil ich nicht nur die ausgabe des telnet clients ins memo schreiben wollte und
so spar ich mir das wiederholen von Memo1.Lines.Add()
Delphi-Quellcode:
Procedure AddStatus (str:string);
begin
frmConsole.Memo1.Lines.Add(str);
end;