Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.22;
Скачать: CL | DM;

Вниз

определение ip адреса   Найти похожие ветки 

 
Out ©   (2005-10-05 00:17) [0]

Необходимо определить ip адрес компа на котором запущена программа. Предупреждая вопросы - пишу внутрикорпоративную софтину, при запуске он должна определить ip адрес юзера и отправить его в БД на сервер. С остальным вопросов нет - а как определить ip адрес - не знаю


 
XProger ©   (2005-10-05 01:27) [1]

http://www.delphimaster.ru/cgi-bin/forum.pl?n=4&search=%EE%EF%F0%E5%E4%E5%EB%E8%F2%FC


 
Out ©   (2005-10-05 07:30) [2]

Что-то я не понял куда ведёт эта ссылка... )


 
Digitman ©   (2005-10-05 13:12) [3]


> определить ip адрес компа


таковых может быть и ни одного, и один-единственный, и более чем один

каждый ip-адрес ассоциируется с конкретным сетевым интерфейсом, каковых может быть более одного

с каждым сетевым интерфейсом может быть ассоциирован и более чем один ip-адрес

вдумайся в это ...


 
Out ©   (2005-10-05 23:38) [4]

Уточню - все ip адреса потом программно отфильтрую

неужели это так сложно, что никто не знает?


 
IceBeerg ©   (2005-10-06 17:22) [5]

var
WSAData: TWSAData;
SockAddrIn: TSockAddrIn;
Host: PHostEnt;
//Эти переменные объявлены в Winsock.pas
begin
if WSAStartup($101, WSAData) = 0 then begin
Host := GetHostByName(@Localname[1]);
if Host then begin
SockAddrIn.sin_addr.S_addr:= longint(plongint(Host^.h_addr_list^)^);
LocalIP := inet_ntoa(SockAddrIn.sin_addr);
end;
WSACleanUp;
end;
end;

Из старого FAQ... сам надеюсь доработаеш



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

Текущий архив: 2006.01.22;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.035 c
2-1136105211
JemCarry
2006-01-01 11:46
2006.01.22
Проблемка с циклом


11-1116964058
rofl
2005-05-24 23:47
2006.01.22
OnMouseOver Effect (TKOLBitBtn.Flat) missing in 2.08


6-1128941707
Dimich1978
2005-10-10 14:55
2006.01.22
Не проходит PING на несколько адресов(IP)


14-1135470822
Yerlan Dossanov
2005-12-25 03:33
2006.01.22
Взаимодействие Delphi с ОС Unix


14-1135366258
meta_person
2005-12-23 22:30
2006.01.22
put_in: оптимизированный тоталитаризм