Hallo und zwar bin dabei ein TS3 Telnet tool zu Programmieren. Nun hab ich zwar schon eine Lösung fürs rausfiltern gefunden aber die nicht optimal ist. Nun hab ich mir mal ein script eines anderen tools angeschaut. Nun komme ich nicht damit klar das ganze in Delphi zu übersetzten es geht um
TCP Indy.
Code:
ret = self.telnet.read_until('\n', 20.0).strip()
if ret == 'error id=0 msg=ok':
Soweit komme ich:
Delphi-Quellcode:
send =
TCP.IOHandler.ReadLn();
if send = '
error id=0 msg=ok'
then
//befehl
else
//befehl
end;