Telnet ausleihen ?

[Bit Juggler]

Hi,
hab mal wieder etwas Zeit zum Programmieren
Ich schreibe an einem Programm in dem ich ein oder zwei Befehle per Telnet ausführen muss.
Ist es möglich mir das Telnet von Windows sozusagen "auszuleihen" ?
Also Telnet starten -> meinen Befehl an das Telnet Fenster übergeben(aus meinem Programm heraus) -> Befehl ausführen -> Telnet beenden...

Wäre super wenn mir hier jemand weiterhelfen könnte!

Gruß Bit

[Tubos]

Warum verwendest du nicht die Indys?

[Bit Juggler]

Hi,
also soweit ich das aus den Demos in meiner Delphi Version sehen kann muss man sich da schon erst einmal einarbeiten.
Soll heißen der Aufwand lonht sich für mich ja garnicht.
Wenn ich es richtig in erinnerung hatte solte der Aufruf von Telnet ziemlich simpel sein, nur leider weiss ich nicht mehr genau wie es geht... ja ja, mehr Zeit müsste man haben

[Bit Juggler]

Hi,
hab mir nun -mir lieb ja nichts anderes übrig *g* - die Zeit genommen und hab mich mal in die Telnet Kompo von Indy eingelesen -> ist Tatsächlich nicht besonderst schwer!
Eine Frage bleibt für mich noch offen:
Gibt es nicht eine Möglichkeit Befehle in einem Rutsch zu senden anstatt immer mit einer Schleife zu arbeiten ?
Ich habe das jetzt so gelößt:

Delphi-Quellcode:

procedure Form1.TestClick(Sender: TObject);
var
  s: String;
  i: Integer;
begin
  s := 'cd /tmp';
  for a := 1 to length(s) do
  begin
    idTelnet1.SendCh(s[a]);
  end;
  idTelnet1.SendCh(#13);
end;

Ich hab schon versucht mit .Write einen ganzen String zu senden das schlug aber alles fehl...

[Tubos]

Zitat:

Ich hab schon versucht mit .Write einen ganzen String zu senden das schlug aber alles fehl...

was genau war denn das problem?

[Bit Juggler]

Hi Tubos,
danke für den Antrieb, schon zum zweiten mal heute
Hab es jetzt hinbekommen!
Das Problem war das ich einfach vergessen hab mit #13 abzuschließen
Nun geht auch der .Write Befehl
Super!

Gruß Bit

[Tubos]

Zitat:

danke für den Antrieb

wieso, ich hab doch nur gefragt wo das problem war *g*

[Bit Juggler]

Ja, aber das ich dir Detailiert antworten konnte hab ich das ganze nochmal konzentriert durchgelesen und da war es mir halt aufgefllen