Home

Page 275
Page 275
background image

268 Глава 5

все ресурсы. После выполнения функция поместит сюда фактическое

число найденных ресурсов.

О lpBuffer — указатель на буфер, в который будет помещен результат.

 — размер буфера.

После вызова этой функции найденные ресурсы добавляются с помощью:

ФУНКЦИЯ ShowResource

 бы ВХОДИТ В

и выглядит вот так:

 ParentNode: TTreeNode;

Res: TNetResource): TTreeNode;

var

Str:String;

begin

if

 then exit;

 ;

while index>0 do

begin

 ) ;

end;

Result

 Str);

end;

После перечисления всех ресурсов вызывается функция

торая закрывает перечисление ресурсов.

Попробуйте скомпилировать программу и запустить ее. Посмотрите, как она

ищет ресурсы, если выбирать различные параметры поиска. На рис. 5.19 вы

можете увидеть результат выполнения моей программы в моей локальной

сети.

Если во время выполнения появится окно с ошибкой, то это не значит, что
программа работает неверно. Возможно, в перечисление попал компьютер,
который требует авторизации и без пароля не пускает. В этом случае гене-
рируется ошибка перечисления, но программа продолжает искать другие

компьютеры в локальной сети.
На компакт-диске в директории \Примеры\Глава 5\Net

 1 вы може-

те увидеть пример этой программы и цветные версии рисунков из этого раз-

дела.


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

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