Home

Page 174
Page 174
background image

Простые приемы работы с сетью 167

говорит. Поэтому вы можете добавлять имя отправителя сразу в текст от-

правки. Код изменится следующим образом:

 Send (' Сюда помести имя

 ;

Можно дать возможность пользователю вводить имя в отдельной строке

ввода Edit2. В этом случае код будет таким;

На

 в директории

 4\Chat вы можете увидеть

пример этой программы.

4.7. Сканирование сети

в поиске доступных ресурсов

Вы знаете, что такое расшаренные ресурсы? Это любые ресурсы компьютера
(директории, диски или принтеры), к которым открыт свободный доступ из

сети. Если компьютер подключен к локальной сети, то для обмена файлами

чаще всего делают доступными (расшаривают) какой-нибудь диск или пап-
ку. Ну а если компьютер имеет еще и выход в Интернет, то к этим ресурсам

можно пробраться из любой точки Земли, если не приняты меры предосто-

рожности .

Очень много начинающих пользователей, находясь в сети, имеют расша-
ренные ресурсы, не защищенные паролем. Сейчас таких пользователей ста-

новится уже намного меньше (да и Windows уже не такая дырявая ОС, и
через нее уже не так сильно дует), но такое чудо можно еще встретить прак-
тически у любого крупного провайдера.,

Как можно догадаться, у любого провайдера есть куча IP-адресов, и переби-

рать их вручную достаточно сложное дело. Чтобы автоматизировать процесс

поиска, используют специальные сканеры расшаренных ресурсов. Про-

стейший вариант такого сканера нам и предстоит сегодня написать. Запус-

кайте Delphi и переходим сразу к практической части.

На форме нам понадобится один компонент TEdit (в свойстве

 укажите

 и один

 (здесь в свойстве

 оставим значение по умолча-

нию

 Компоненты нужно должным образом оформить и добавить кно-

почку

 На рис. 4.25 вы можете увидеть мой вариант формы.

В компонент AddressEdit мы будем вводить адрес сканируемого компьюте-

ра. В данном примере я решил ограничиться сканированием только одного

адреса. Если вы захотите, то сможете потом доработать пример, чтобы он

перебирал несколько адресов подряд или брал их из списка. Но это уже на
ваше усмотрение, а для примера достаточно и одного. Ну а в компоненте

мы будем отображать найденные ресурсы, лежащие в свободном доступе.


Copyright © 2020 Файлообменник files.d-lan.dp.ua

Использование любых материалов сайта возможно только с разрешения автора.