|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
13.12.2007, 12:54 | #1 |
Пользователь Подтвердите свой е-майл
Регистрация: 15.08.2007
Сообщений: 21
|
Определение IP
Здравствуйте Уважаемые Форумчане!
Как определить свой внешний IP? Написал чат, он нормально работал, пока я не поставил DSL, теперь определается только локальный адрес (192.168.1.2 ). Использую вот эту процедуру: *********************************** ******* procedure TGF.getipandhost; var wVerReq: WORD; wsaData: TWSAData; i: pchar; h: PHostEnt; c: array[0..128] of char; begin wVerReq := MAKEWORD(1, 1); WSAStartup(wVerReq, wsaData); //хост GetHostName(@c, 128); h := GetHostByName(@c); //IP i := iNet_ntoa(PInAddr(h^.h_addr_list^)^ ); IPaddr.text := i; WSACleanup; end; *********************************** ** На Dial-up'е проблем не было.. |
13.12.2007, 13:11 | #2 |
Пользователь Подтвердите свой е-майл
Регистрация: 15.08.2007
Сообщений: 21
|
попробовал это код , не помогает, все равно 192.1681.2:
Код:
|
13.12.2007, 14:13 | #3 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
Поиском пользоваться не пробовали ?
http://programmersforum.ru/showthread.php?t=9050
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
13.12.2007, 15:43 | #4 |
Пользователь Подтвердите свой е-майл
Регистрация: 15.08.2007
Сообщений: 21
|
Пробовал , пример помог.
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
определение ip-адресса | Ермоленко Виктор | Помощь студентам | 0 | 02.06.2008 13:44 |
Определение IP | IvanLex | HTML и CSS | 6 | 28.03.2008 07:46 |
Определение IP | IvanLex | Общие вопросы по Java, Java SE, Kotlin | 1 | 19.02.2008 09:12 |
Определение местоположения по IP | Zer0 | Работа с сетью в Delphi | 8 | 27.12.2007 10:56 |
из Паскаля определить запущен ли Windows | Трофимов Александр | Паскаль, Turbo Pascal, PascalABC.NET | 9 | 14.06.2007 15:25 |