Hallo Liebe Community!
Auch wenn ich ertst seit kurzem angemeldet bin, habe ich hier schon desöfteren rumgestöbert, da die meisten Beiträge doch sehhhr hilfreich sind!
Ich hoffe, auch wenn ich newbie in diesem forum bin, Unterstützung zu bekommen. Also, nun zum Prioblem:
Ich habe ein Programm, über das ich auf Telnet zugreifen möchte/muss. Dieses Programm schickt bei einer Verbindung folgendes:
Tante_EDIT:Bild in den Anhzang verschoben
Im Programm, welches die Verbindungen annehmen soll steht dann etwas in der Art:
Code:
Fernverbindung vom 127.0.0.1:1518
Remote Autoresierung ok
Mein Programm verbindet sich über port 81, deswegen bin ich über die erste Aussage des Programms schon verwundert, dann Klappt aber anscheinend die Verbindung (Remote Autoresierung ok), jedoch stürzt dann mein geschriebenes Programm ab.
Der Quellcode für diesen teil des Programms ist:
Code:
procedure TForm1.Button1Click(Sender: TObject);
begin
Tel.host:=Edit1.Text;/
localhost
Tel.Port:=StrToInt(Edit3.Text);/port (81)
Pass:=MaskEdit1.Text;//passwort("halloXD" falls es hilft. . )
tel.Connect;
tel.Sendcmd(Pass);
end;
nach dem Autoresieren bleibt er hängen und macht NIX.
Ich hoffe nun also auf eure Unterstützung, und ich hoffe, dass mein Gehirn grade etwas hackt und es an einer simplen 'Kleinigkeit liegt
P.S
as Programm das annehmen soll lauscht übrigens auch auf port 81
EDIT: Bild in den Anhang verschoben, aber Hilfestellung wäre nicht schlecht
