![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как узнать IP-адрес??? [D5, Win2k]
Klaz © (2002-12-17 08:21:00)Сино не ругайтесь, плз. Походил на форуме, нашел такой исходничек, вставляю его в прогу - ругается на неизвестные типы 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;
Anatoly Podgoretsky (2002-12-17 10:01:00) [1]Когда ругается на неисзвестные типы, при условии что они написаны правильно, то единственная причина - не подключен нужный модуль, других не существует.
KasAlex (2002-12-17 09:51:00) [2]Модуль WinSock подключил?
Klaz (2002-12-17 09:42:00) [3]а че, свой IP нихто не узнавал?