also mein Problem ist das ermitteln der aktuellen Internet-
IP auch wenn man sich über einen Router o.ä. einloggt...
bei PC's die sich über das Telefonnetz einwählen habe ich bisher folgende methode angewandt:
Delphi-Quellcode:
uses ..., winsock;
function getIPAdress: string;
var phoste : PHostEnt;
Buffer : array[0..100] of char;
WSAData : TWSADATA;
begin
result:='';
if WSAStartup($0101, WSADATA) <> 0 then exit;
GetHostName(Buffer, Sizeof(Buffer));
phoste:=GetHostbyName(buffer);
if phoste = nil then
result:= '127.0.0.1'
else
result:= StrPas(inet_ntoa(PinAddr(phoste^.h_addr_list^)^));
WSACleanup;
end;
Wenn mein PC aber im LAN steht, dann erhalte ich hier nur das übliche 192.168.1.x oder so...
wer kann helfen?
Danke euch!
es grüsst Kendor
PS: Happy New Year
