Hi!
Zitat von
oki:
Hi WS1976. Poste den Code doch hier, dann haben wir alle was davon. Ich bräuchte das für meinen Router "Speedport W 701V".
Gruß oki
Ja, genau! Mit UPnP wäre am logischsten weil man dafür nicht ins Netzt gehen muss!
Ich habe folgendes probiert:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
Temp: string;
begin
Temp := IdHTTP1.Get('http://checkip.dyndns.org');
Label1.Caption := Copy(Temp, Pos(':', Temp) + 2, Pos('</bo', Temp) - Pos(':', Temp) - 2);
Label2.Caption:= Temp;
end;
Gut, ok, das in den Label 2 rein zu schreibben ist gewagt, ich geb´s zu!
Aber ich bekomme mit
Indy 10 immer nur die Fehlermeldung:
Zitat von
Indy 10 IdHTTP1:
Socket Error # 10055 No Buffer Space available!
Wieso funktioniert denn dat mit dem Quote nit?
Grüsse von TOC
!