Problem mit der IP für Chat übers internet

[elloco15]

Hallo, ich hab ein Problem. Ich hab nen kleines Chat-Programm geschriebe und kann auch im Netzwerk senden. Jetzt wollte ich auch übers Internet senden nur weiß ich nicht welche IP ich da nehmen muss. Die normale IP, z.B. 192.168.0.5 oder eine andere? Wenn eine Andere, welche? Kann ich das überhaupt mit den Standard Komponenten von Delphi machen oder brauch ich da andere? Danke schon mal

[Meflin]

hi,
erstmal herzlich wilkommen in der dp!
die ip die du nehmen musst ist die "normale" ip (wie der name schon sagt: internet protokol) das wovon du sprichst ist wohl die netzwerk ip, die ist aber ne ganz andere baustelle! die ip findest du z.b. hier raus:
http://www.ip.acira.net
http://www.ipcheck.de
ansonsten funktioniert alles wie mit deiner netzwerkverbindung!

*MFG*

[Aenogym]

jo. und noch ein tipp, wie du diene eigene internet-IP zuverlässig herausfinden kannst:

Delphi-Quellcode:

var
  ip: string;
begin
  ip := idHTTP1.get('http://aenogym.pyrokar.lima-city.de/get_ip.php');
end;

ABER: der server hat öfters mal ausfälle, also nicht drauf verlassen ;)

Aenogym

[Meflin]

da du das zuverlässig so in deinem beitrag betonst, meinst du vielleicht meine zwei links wären nicht zuverlässig? und dann schreibst du in der zweiten zeile dass der server dauernd ausfällt :roll: also irgendwo hängts da...

[shmia]

Zitat:

Zitat von Meflin

..., meinst du vielleicht meine zwei links wären nicht zuverlässig?

Einigen wir uns einfach auf eine Liste von möglichen URLs:
http://checkip.dyndns.org
http://checkip.dyndns.org:8245
http://ipdetect.dnspark.com
http://ip.ChangeIP.com/ip.asp
http://www.dnsart.com/myip.php
http://www.dnsart.com:7777/myip.php
http://dynupdate.no-ip.com/ip.php
http://update.dynu.com/basic/ipcheck.asp
http://dynamic.zoneedit.com/checkip.html
http://aenogym.pyrokar.lima-city.de/get_ip.php
http://www.ip.acira.net
http://www.ipcheck.de

[Die Muhkuh]

www.wasistmeineip.de

^^ hast du vergessen ;)

[S2B]

www.wieistmeineip.de

klingt besser und man kann es sich besser merken imho! :mrgreen:

[Matze]

Ich nehm immer: http://whatismyip.de/ :mrgreen: ;)

[elloco15]

ok, dank. gibt es eine möglichkeit die PI, die mir www.ipcheck.de anzeigt, mit den standard delphi komponenten in mein programm einzubinden?

[supermuckl]

jo.. die seite mit nem versteckten http client saugen
und die entsprechende stelle per "suchen im string" finden und die ip ausschneiden bzw supermsk verwenden um sie zu finden( siehe powerstreamers mirc DDE post )

[StefanDP]

genauso wie es Aenogym im 3ten posting geschrieben hat!
im string "ip" hast du dann deine ip (natürlich nur, wenn das downloaden funktiniert hat)

[Aenogym]

Zitat:

Zitat von Meflin

da du das zuverlässig so in deinem beitrag betonst, meinst du vielleicht meine zwei links wären nicht zuverlässig? und dann schreibst du in der zweiten zeile dass der server dauernd ausfällt :roll: also irgendwo hängts da...

nein, nein. sorry. ich habe zuverlässig nur betont, weil es ja schon des öfteren diskussionen über interne Netzwerk-IPs und Internet-IPs gab. dass der server einmal im monat ausfällt ist schade, aber naja.

ich habe das nur mal geschrieben, da man mit dieser einzigen zeile dann die IP in der variable hat. bei den anderen adressen wird dir ja ne komplette HTML-datei ausgegeben, welche man erstmal nach der IP durchsuchen müsste ;)

ich hab mir diese php-datei gemacht, weil es so echt schnell (kein HTML code - nur die IP) ist und eben ohne parsing usw. die IP zurückliefert.

Aenogym

[Spurius]

Ich hab noch ne Frage, muss der Port, über den man connected, geforwarded werden, wenn man hinter nem Router sitzt?

[Torsten Borstensohn]

Gibt es denn in Delphi 6 oder 7 keine Möglichkeit, die eigene IP anzeigen zu lassen, ohne groß rumzaubern zu müssen? In Delphi 3 ging das einfach so:

procedure TfrmChat_Server.btnListenClick(Sender: TObject);
begin
TCP.Close;
TCP.LocalPort := 1000;
edtIP.Text := TCP.LocalIP; // <----------
btnListen.Enabled := false;
btnClose.Enabled := true;
end;

Wenn man mit dem lokalen Netzwerk oder auch dem Internet verbunden ist, wird automatisch die entsprechenede eigene IP angezeigt; ist keine Winsock-Verbindung geöffnet, wird die lokale Standard-IP angezeigt, also 127.0.0.1.
Aber in Delphi 6 habe ich das leider auch noch nicht hingekriegt; es erscheint immer 0.0.0.0, egal ob ich mit dem Internet verbunden bin oder nicht.

[alcaeus]

Guckst du hier, das Thema wurde schon oft genug diskutiert.

Greetz
alcaeus

[Torsten Borstensohn]

An alcaeus:

Danke für den Hinweis!
Ich bin ja neu hier im Forum und hab deswegen noch nicht so den Überblick, was schon mal diskutiert worden ist und was nicht.

Ähm, Anfänger in Delphi bin ich auch, würde ich sagen. Den Quellcode in dem verlinkten Artikel finde ich schwierig. Also, wie gesagt, in Delphi 3 ging es ja sehr einfach, und in Visual Basic habe ich es auch hingekriegt. Nur will's mir in Delphi 6 nicht gelingen.

[supermuckl]

Zitat:

Zitat von Torsten Borstensohn

Ich bin ja neu hier im Forum und hab deswegen noch nicht so den Überblick, was schon mal diskutiert worden ist und was nicht.

tjo dafür gibts die hilfe die dir den überblick erbringt

[Torsten Borstensohn]

Zitat:

Zitat von supermuckl

tjo dafür gibts die hilfe die dir den überblick erbringt

Sischer, siiiischer! Aber manchmal übersieht man halt was. Und ich hab schon 'ne Brille, menno!

[Thorben86]

Sonst kannst du auch die suche verwenden, damit findet man auch schon einiges, was schon diskutiert wurde.

[Torsten Borstensohn]

http://www.entwickler-forum.de/webx?...fFj.0@.ee7def3

Nach den Beschreibungen im obigen Link scheint es von der Delphi-Edition abhängig zu sein, wie schwer oder leicht das Programm die eigene IP-Adresse ermittelt:

Zitat:

Allerdings kann man auch einfach - vorausgesetzt, dass man die Client-Server-Version von Delphi hat - die "Serversocket.Socket.LocalAddress"-Eigenschaft nehmen ...

Das würde erklären, warum ich es in Delphi 3 Professional hinkriege, aber nicht in Delphi 6, da ich davon nur die Personal Edition besitze (die die zwei Internet-Komponenten TClientSocket und TServerSocket enthält).

[Torsten Borstensohn]

An Thorben86:
Okay, danke!