Hab mal markiert, was ich meine, dass es fehlt:
Delphi-Quellcode:
procedure TForm1.Button15Click(Sender: TObject);
var
telnet: TTelnetsend;
begin
TelnetConnect;
memo6.Lines.Clear;
telnet:= TTelnetsend.Create;
try
telnet.WaitFor('>');
telnet.Send(Edit14.Text+#10);
telnet.WaitFor('>'); // DAS HIER MEINE ICH
Memo6.Lines.Text:=telnet.sessionlog;
finally
end;
end;
Du musst halt immer auf eine Antwort warten.