das wie es jetzt ist funktioniert es ja, aber viel zu langsam , das dauert über eine minute bis er den befehl ausgibt
vielleicht jannst mir an den beispiel mal helfen mit den variablen...wäre sehr nett... Habe nix gefunden in einem Beispiel wie ich das bei Telnet mit variablen vereinfache oder beschleunige
Code:
procedure TForm1.Button15Click(Sender: TObject);
var
telnet: TTelnetsend;
begin
memo6.Lines.Clear;
telnet:= TTelnetsend.Create;
try
telnet.TargetHost:=ComboBox1.Text;
telnet.Login;
telnet.WaitFor('login:');
telnet.Send(Edit3.Text+#$0d+#$0a);
telnet.WaitFor('word:');
telnet.Send(Edit4.Text+#$0d+#$0a);
telnet.WaitFor('>');
telnet.Send(Edit14.Text+#$0d+#$0a);
telnet.WaitFor('>');
Memo6.Lines.Text:=telnet.sessionlog;
finally
end;
end;
hab das telnetconect komplett rausgeschmissen
danke