Home

Page 97
Page 97
background image

90 Глава 3

rect:TRect;

begin

if not

 then

begin

exit;

end;

//Получаем размеры найденного окна

GetWindowRect

//Генерируем случайное число

if

 then

begin

//Если оно 0, то увеличиваем...

end

else

begin

//Иначе уменьшаем...

end;

end;

h:THandle;

begin

//Запускаем цикл

while true do


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

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