Найдите закладку Indy Clients на палитре компонентов и перенесите на форму компонент idwhois с этой закладки. Выделите компонент idwhois и перейдите в окно инспектора объектов. Посмотрите на свойство Host. Здесь вы должны указать адрес сервера, у которого есть сервис Whois. Точнее сказать, вы должны указать именно на этот сервис. По умолчанию стоит адрес whois.internic.net. Его пока менять не надо, потому что он вполне рабочий и очень быстрый. Но если вы хотите изменить этот адрес, то обязательно проверьте, какой порт используется. Если отличный от 43, то вы должны изменить свойство port у компонента IdWhois. В принципе, настройки по умолчанию достаточно работают для любых доменов в зоне COM, ОRG и NET. Если вас интересует что-то специфическое, то только тогда вам может понадобиться смена сервера whois. Если вам нужно узнать информацию о украинском домене.uа, то придется искать украинский сервис. В программировании компоненты Indy так же просты, как и в настройке. Создайте обработчик события onClick для кнопки «Найти».
При создании программы можно придерживаться следующих указаний:
§ Использовать очистку содержимого компонента ТМеmо от текста, оставшегося от предыдущих поисков;
§ При создании строки кода поиска использовать метод whois компонента IdWhois:
FindResult:=IdWhoIs.WhoIs(Edit1.Text)
где, FindResult – переменная строкового типа, Edit1 – имя искомого домена.
§ Результат поиска будет состоять из нескольких строк, а в переменной он будет выглядеть как одна длинная строка, в которой разделителем текстовых строк является шестнадцатеричный символ #10. Чтобы текст выглядел нормально, необходимо отформатировать содержимое переменной FindResult.
Примечание. #10 – код символа перевода каретки (перехода на новую строку), который используется в ОС семейства *nix. В Windows принято конец строки обозначить парой символов #13 и #10.
Для выяснения информации об интересующем имени домена, необходимо запустить вашу программу, и она сама обращается куда надо и показывает вам информацию в удобном для восприятия виде. Работает все просто, потому что компонент отправляет запрос серверу в Интернете (в данном случае whois.internic.net) и получает ответ. Никаких самостоятельных поисков по базам данных не происходит.
Самостоятельная работа.
Задание 1. Согласно своему порядковому номеру в списке группы найти информацию о домене:
- versii.com
- oligarh.net
- yandex.ru
- президент.рф
- volia.com
- news.ru
- sport.ru
- ukr.net
- from-ua.com
- mail.ru
- i.ua
- 1plus1.net
- membrana.ru
- 3dnews.ru
- rada.gov.ua
- musicradio.kiev.ua
- lenta.ru