Thema: Delphi Indy Ip Ermitteln

Einzelnen Beitrag anzeigen

-lx-
(Gast)

n/a Beiträge
 
#5

Re: Indy Ip Ermitteln

  Alt 19. Aug 2006, 19:39
Eine Frage dazu: Wie kann der TIdTCPServer (Indy10) seine eigene IP ermitteln, sobald er beim aufrufen des programms gestratt wird.
Also nur gestratet wird - ohne jegliche ein- oder ausgehende Verbindungen.


Delphi-Quellcode:
Memo1.Lines.Add(AContext.Binding.IP) ; // IP Adresse des Servers
Memo1.Lines.Add(IntToStr(AContext.Binding.PeerPort)) ;
So kann ich bei TIdTCPServer Eriegnissen die IP und en Port des Servers herausbekommen.
Jedoch will ich dass IP und Port des Servers sofort beim öffnen es programms angezeigt werden.

Wie kann ich das bsp. im OnCreate -Event des Hauptformulars einbetten?


Wieso wird mit " AContext.Binding.PeerPort " nicht der richtige Port angeiegt? Bei mir zeigt er 2011 an jedoch wurde 50 005 eingetragen !?




mfg
Cya
  Mit Zitat antworten Zitat