Delphi-Help

Главная Статьи Интернет Как узнать внешний Ip-адрес?

Как узнать внешний Ip-адрес?

Оцените материал
(2 голосов)


Как узнать внешний Ip-адрес?

Кидаем на форму IdHTTP и пишем обработчик:

procedure TForm1.Button1Click(Sender: TObject);
var
   ip : string;
begin
        try
           ip := idHTTP1.Get('http://www.whatismyip.com/automation/n09230945.asp');
        except
           // интернета нет или не подключен…
        end;
end;
Прочитано 8115 раз
Другие материалы в этой категории: « Многопоточное ping-приложение

Авторизация



Счетчики