Problem mit der IP für Chat übers internet

[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 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 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 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 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).