Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Вниз

Как узнать программно свой IP? 


kex   (2001-12-19 12:05) [0]

Народ, поскажите как мне узнать программно свой IP, желательно чезер Win API функции...?



Snake2000   (2001-12-19 12:39) [1]

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;




Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.019 c
4-19375           BDRON                 2002-01-08 18:12  2002.03.07  
Handle шпион


6-19284           DelphiG               2001-12-21 02:15  2002.03.07  
Как примерно выглядет процедура отключения от интернета?


1-19123           Andreyka              2002-02-20 19:58  2002.03.07  
Вопросец про кнопки


1-19219           Lokk                  2002-02-19 15:44  2002.03.07  
У меня вопрос


3-19053           Владимир 2            2002-02-06 15:40  2002.03.07  
Ошибка AccessViolation при попытке посчитать записи методом RecordCount