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

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

← →
Klaz   (2002-12-17 08:21) [0]

Сино не ругайтесь, плз. Походил на форуме, нашел такой исходничек, вставляю его в прогу - ругается на неизвестные типы TWSAData и т.п. ШО Я ДЕЛАЮ НЕ ТАК, HELP ME...

var
WSAData : TWSAData;
p : PHostEnt;
Name : array [0..$FF] of Char;
begin
WSAStartup($0101, WSAData);
GetHostName(name, $FF);
p := GetHostByName(Name);
showmessage(inet_ntoa(PInAddr(p.h_addr_list^)^));
WSACleanup;
end;

---

← →
Klaz   (2002-12-17 09:42) [1]

а че, свой IP нихто не узнавал?

---

← →
KasAlex ©   (2002-12-17 09:51) [2]

Модуль WinSock подключил?

---

← →
Anatoly Podgoretsky ©   (2002-12-17 10:01) [3]

Когда ругается на неисзвестные типы, при условии что они написаны правильно, то единственная причина - не подключен нужный модуль, других не существует.

---

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

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



Память: 0.45 MB
Время: 0.01 c