Скачать: CL | DM;

Как узнать свой текущий IP?   Найти похожие ветки 

← →
2ac   (2004-01-20 08:25) [0]

Как узнать свой текущий IP?

---

← →
Anatoly Podgoretsky ©   (2004-01-20 09:51) [1]

127.0.0.1

---

← →
S@shka ©   (2004-01-20 12:26) [2]

Компонент PowerSocket в FastNet
Или смотрим раздел FAQ сети

---

← →
Neo_vr   (2004-01-20 19:03) [3]

Удалено модератором
Примечание: Дубль...

---

← →
Neo_vr   (2004-01-20 19:03) [4]

Используй эту функцию
function LocalIP: String;
type
 TaPInAddr = Array[0..10] of PInAddr;
 PaPInAddr = ^TaPInAddr;
var
 phe: PHostEnt;
 pptr: PaPInAddr;
 Buffer: Array[0..63] of Char;
 I: Integer;
 GInitData: TWSAData;
begin
 WSAStartup($101, GInitData);
 Result := "";
 GetHostName(Buffer, SizeOf(Buffer));
 phe := GetHostByName(buffer);
 if phe = nil then Exit;
 pPtr := PaPInAddr(phe^.h_addr_list);
 I := 0;
 while pPtr^[I] <> nil do
  begin
   Result := inet_ntoa(pptr^[I]^);
   Inc(I);
  end;
 WSACleanup;
end;


---

← →
Kor@l ©   (2004-02-10 21:36) [5]

да есть компонент в indy ipwatch называеться о всё сам скажет

---

← →
DelphiN! ©   (2004-02-11 21:41) [6]

а какой именно их ведь 2

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.028 c