Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

СРОЧНО!!! ЛЮДИ СКАЖИТЕ КАК ПОЛУЧИТЬ IP-адресс(не локального)? [Delphi, Windows]


INNOCHENTI ©   (2002-04-23 17:30:00) 

Как его зделать до среды нужно...


Anatoly Podgoretsky   (2002-04-29 08:23:00) [1]

K-Sergey (29.04.02 05:43)
Ты бы задал свой вопрос как положено в отдельной своей сообственной ветке


K-Sergey   (2002-04-29 05:43:00) [2]

TWSAData -А где бы его взять?


Anatoly Podgoretsky   (2002-04-24 09:43:00) [3]

Выбрось GetHostName(name, $FF);


3d[Power]   (2002-04-24 09:32:00) [4]

=) cорри, уставший был не заметил. Насколько я знаю ты пишешь игру на дельфиксе. Возми локальный ИП и отправь другому компу


INNOCHENTI   (2002-04-24 08:20:00) [5]

Я ведь просил не локального!!!!!


3d[Power]   (2002-04-23 21:44:00) [6]

uzez winsock;

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо