Home

Page 175
Page 175
background image

168

Глава 4

 Сетевое

 4.25. Форма будущей программы

Теперь нам нужно создать обработчик события

 кнопки и написать

в нем следующее (листинг 4.3).

procedure

 TObject);

 THandle;

NetContainerToOpen:
ResourceBuffer:

 of TNetResource;

 DWORD;

begin

NetContainerToOpen.

 or

while TRUE do

begin

 :=

EntriesToGet

 2000;

if

 <>

 EntriesToGet,

 ResourceBuf)) then


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

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