Eigener Telnet Client

[Stony2k]

Hallo,

ich habe folgendes vor:
Wir haben ein Programm auf unserem Win23k Server am laufen, worauf man per Telnet zugreifen kann.
Sprich erst IP und Port, danach muss man seinen Username und PW eingeben.

Ist man nun erfolgreich verbunden, so kann man befehle an das Programm senden.

Hierzu habe ich etwas gefunden, was ich allerdigs weniger gebrauchen kann, da man dort kein Passwort oder sonstiges eingeben kann:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  s: TStrings;
begin
  s := TStringList.Create;
  with TCPClient do
  begin
    RemoteHost := '127.0.0.1';
    RemotePort := '2593';
    Connect;
    SendLn('GET /');
    SendLn('');
    while Connected and WaitForData(1000) do
      s.Add(ReceiveLn());
    Disconnect;
  end;
  ShowMessage(s.Text);
  s.Free;

end;

Kann mir da vielleicht wer helfen?