Hallo!!
ich habe mir ein Programm gebaut was an einen bekannten die
ip meines rechners schickt! wenn jetzt aber mein router sich neu einwählt ist das ja auch eine andere
ip als vorher kann ich oder wie kann ich das machen das mein programm selber überprüft ob sich die
ip meines rechners verändert hat?? wie könnte ich das machen das mein Programm nur die
ip nochmal an ihn schickt wenn sie sich verändert hat?? hätte da vieleicht einer einen tip??
Delphi-Quellcode:
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
Edit1.Text := IdHTTP1.Get('http://checkip.dyndns.org');
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ICQClient1.ICQServer := 'login.icq.com';
ICQClient1.ICQPort := ****;
ICQClient1.UIN:=********;
ICQClient1.Password:='*****';
ICQClient1.Login;
end;
procedure TForm1.ICQClient1MessageRecv(Sender: TObject; Msg, UIN: String);
begin
ShowMessage(Msg + ' von: ' + UIN);
end;
procedure TForm1.ICQClient1Login(Sender: TObject);
begin
ICQClient1.SendMessage(******,Edit1.Text);
end;
end.
ja na es würde ja auch über dyndns.org gehen aber ich wollte das halt mal so testen !!
hätte da vieleicht einer einen tip??
Mfg Luke23
Ps: oder gäbe es da noch ne bessere sache?? ausser dyndns.org oder sowas
[edit=r_kerber]Delphi-Tags einegfügt. Mfg, r_kerber[/edit]