Перебор окон на рабочем столе
Требуется перебор окон на рабочем столе по нажатию клавиши.
Пытаюсь по Фленову (у него перебор через случайный промежуток времени)
запускаю в цикле
enumwindows(@enumwindowsproc,0)
А в функции
function enumwindowsproc(h:hwnd,lparam:integer):BOOL;stdcal ;
begin
iswindowsvisible(h) then
if random(100)=4 then
setforeground(h);
result:=true;
замена строчки if random ... на обработку событий от клавиатуры ни к чему не приводит, т.к. оно привязано к созданому мной приложению.
|