Wie bekommt man die Öffentliche IP heraus ?

[Corpsman]

Hi Leuts,

ich habe wie wohl die meisten einen Router über den ich ins I-net gehe.

nu will ich mit einem Delphi Programm meine IP addresse bekommen die man vom I-net aus sieht ( also die dies Routers ).

ich weis das es möglich sein mus, denn mein Miranda Client zeigt mir sie immer als External IP an.

Nur wie.

Ich Forum hab ich schon gesucht aber nichts gefunden. Und meine Indy Kombos geben mir immer nur die Lokalen IP's.


Kann mir einer von euch helfen ?

[Namenloser]

Hi,

ich glaube dazu gabs schon mehrere Diskussionen, die immer das Ergebnis hatten, dass es nicht ohne eine externe Seite geht.
Du kannst aber auf deinen Webspace eine PHP-Datei mit folgendem Inhalt legen:

Code:

<?php
  echo $_SERVER['REMOTE_ADDR'];
?>

Die kannst du dann per Indy auslesen...

[mkinzler]

Der ICQ-Client bekommt diese IP über den Server.
Entweder du schaust ob dein Router dir eine Möglichkeit bietet die IP auszulesen oder du verwendest eine externe Quelle.
http://www.whatismyip.de/

[Corpsman]

@NamenLozer

ok Webspace hab ich zum Glück.

Und die PHP datei erstellen und hochladen ist kein problem.

Allerdings habe ich mit Indy bisher nur TCP/IPClient(server), bzw UDP/server benutzt.

wie konnecte ich mich dann auf diese PHP datei und ermittle dann damit meine IP ?

[mkinzler]

Per TIdHTTPClient

[Corpsman]

hmm ich hab indy 9 da gibts das net, hab nur nen TIdHTTPServer will mal mein Glück mit dem versuchen ;)

[mkinzler]

Früher hieß es TIdHTTP
http://www.dsdt.info/tutorials/indy/

[Namenloser]

Ich glaube, die Komponente heißt auch einfach nur TIdHTTP

edit: zu spät

[Corpsman]

Cool das geht ja total easy. THX

hier mal meine Lösung falls igrendjemand das später auch mal Probieren will.

Delphi-Quellcode:

Var
  bla: TIdHTTP;
Begin
  bla := TIdHTTP.create(self);
  showmessage(bla.Get('Addresse der oben Geposteten php Datei'));
  bla.free;
End;

[FAlter]

Hi,

:shock: Sowas kann ich nicht mehr sehen

du solltest noch try..finally..end hinzufügen :!:

Mfg
FAlter