Files |  Tutorials |  Articles |  Links |  Home |  Team |  Forum |  Wiki |  Impressum

Aktuelle Zeit: Sa Jul 05, 2025 06:54

Foren-Übersicht » Programmierung » Allgemein
Unbeantwortete Themen | Aktive Themen



Ein neues Thema erstellen Auf das Thema antworten  [ 7 Beiträge ] 
Autor Nachricht
 Betreff des Beitrags: IP
BeitragVerfasst: Di Dez 17, 2002 17:29 
Offline
DGL Member
Benutzeravatar

Registriert: Sa Mai 04, 2002 20:04
Beiträge: 12
hi
kann mir jemand einen source geben der meine internet ip adresse herausfindet. bitte mit erklärung

mfg
Phoenix


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags:
BeitragVerfasst: Di Dez 17, 2002 20:29 
Offline
DGL Member
Benutzeravatar

Registriert: Mo Sep 02, 2002 15:41
Beiträge: 867
Wohnort: nahe Stuttgart
Code:
  1.  
  2.  
  3. uses winsock;
  4.  
  5.  
  6.  
  7. function GetIpAddress: string;
  8.  
  9. var phoste: PHostEnt;
  10.  
  11.   Buffer: array [0..100] of char;
  12.  
  13.   WSAData: TWSADATA;
  14.  
  15. begin
  16.  
  17.   result:='';
  18.  
  19.  &nbsp;if WSAStartup($0101, WSAData) <> 0 then exit;
  20.  
  21.  &nbsp;GetHostName(Buffer,Sizeof(Buffer));
  22.  
  23.  &nbsp;phoste:=GetHostByName(buffer);
  24.  
  25.  &nbsp;if phoste = nil then result:='127.0.0.1';
  26.  
  27.  &nbsp;else result:=StrPas(inet_ntoa(PInAddr(phoste^.h_addr_list^)^));
  28.  
  29.  &nbsp;WSACleanup;
  30.  
  31. end;
  32.  
  33.  

Müsste funktionieren, kann ich leider nicht erklären


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags:
BeitragVerfasst: Di Dez 17, 2002 21:56 
Offline
DGL Member
Benutzeravatar

Registriert: Sa Mai 04, 2002 20:04
Beiträge: 12
hi
danke für die antwort aber das zeigt mir ne 169... adresse ab. das is die lokale ip adresse meiner netzwerkkarte für dsl

mfg
Phoenix


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags:
BeitragVerfasst: Di Dez 17, 2002 22:22 
Offline
Fels i.d. Brandung
Benutzeravatar

Registriert: Sa Mai 04, 2002 19:48
Beiträge: 3830
Wohnort: Tespe (nahe Hamburg)
Ahem... ich meine ich habe wieder einmal ne dicke Rübe, aber 169 sieht nicht wirklich nach deiner lokalen LAN-Adresse aus und wenn, dann solltest Du es schleunigst auf das bringen wo es hingehört : 192.168.x.x..

Sieht nämlich verdammt nach einer externen aus... IMAO sogar T-Online...

_________________
"Light travels faster than sound. This is why some people appear bright, before you can hear them speak..."


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags:
BeitragVerfasst: Di Dez 17, 2002 22:39 
Offline
DGL Member
Benutzeravatar

Registriert: Mo Sep 02, 2002 15:41
Beiträge: 867
Wohnort: nahe Stuttgart
AOL hat meines wissens 172.x.x.x und so eine IP bekomme ich bei mir auch angezeigt.


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags:
BeitragVerfasst: Di Dez 17, 2002 22:41 
Offline
DGL Member

Registriert: Do Mai 30, 2002 18:48
Beiträge: 1617
[entfernt. code unbekannter herkunnft]


Zuletzt geändert von Delphic am Do Jul 09, 2009 16:50, insgesamt 1-mal geändert.

Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags:
BeitragVerfasst: Mi Dez 18, 2002 13:42 
Offline
DGL Member
Benutzeravatar

Registriert: Sa Mai 04, 2002 20:04
Beiträge: 12
so
danke erstmal
also die procedure von delphic zeigt mir 3 ips an... die erste ist wieder die von bluetobys function. die anderen 2 sagen mir nix
also 1: kannst du mir sagen welche da die richtige ist und
2. kannst du mir den code erklären?

mfg
Phoenix


Nach oben
 Profil  
Mit Zitat antworten  
Beiträge der letzten Zeit anzeigen:  Sortiere nach  
Ein neues Thema erstellen Auf das Thema antworten  [ 7 Beiträge ] 
Foren-Übersicht » Programmierung » Allgemein


Wer ist online?

Mitglieder in diesem Forum: Bing [Bot] und 10 Gäste


Du darfst keine neuen Themen in diesem Forum erstellen.
Du darfst keine Antworten zu Themen in diesem Forum erstellen.
Du darfst deine Beiträge in diesem Forum nicht ändern.
Du darfst deine Beiträge in diesem Forum nicht löschen.
Du darfst keine Dateianhänge in diesem Forum erstellen.

Suche nach:
Gehe zu:  
  Powered by phpBB® Forum Software © phpBB Group
Deutsche Übersetzung durch phpBB.de
[ Time : 0.007s | 17 Queries | GZIP : On ]