Forum: Netzwerke
Delphi
by dopeline,
27. Nov 2005
Also ich habe das jetzt mal in das OnClose-Ereignis eingebettet:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var ini:TiniFile;
i: Integer;
begin
ini:= TIniFile.Create(ExtractFilePath(Application.ExeName)+'telnet.cfg');
try
ini.WriteString('Connection','HostIP',EditHost.Text);
ini.WriteString('Connection','Username',EditUser.Text);
...
Forum: Netzwerke
Delphi
by dopeline,
27. Nov 2005
So, da das ja jetzt gelöärt ist, würd ich gern noch eine weitere Frage stellen :wink:
Wenn ich das Programm beende, gibt es ne Fehlermeldung, dass die Verbindung nicht getrennt wurde. also habe ich versucht, im OnClose das zu tun. mit Telnet1.disconnect;
Aber das funktioniert nicht... Gibt wieder ne andere Errormessage:
---------------------------
Benachrichtigung über...
Forum: Netzwerke
Delphi
by dopeline,
27. Nov 2005
hmm... seltsam. habe jetzt mal ein neues projekt mit nem button und der telnet-komponente erstellt. bis auf, dass ich bei OnDataAvailable noch was eintragen musste, habe ich nichts anders gemacht, als beim eigentlichen projekt, aber jetzt funktioniert es....
Nagut, dann bistel ich mal von vorne und teste am besten etwas öfters...
Vielen Dank!
Gruß, dopeline
Forum: Netzwerke
Delphi
by dopeline,
27. Nov 2005
So, hab alles bis auf das hier rausgelöscht und es probiert...
procedure TForm1.Button2Click(Sender: TObject);
begin
Telnet1.Host:='192.168.1.1';
Telnet1.Port:=23;
try
Telnet1.Connect();
finally
Memo1.Lines.Add('Verbindung zu 192.168.1.1 hergestellt...');
end;