[rectator]

Помогите!
Скомпилируйте кто-нибудь этот код! Очень надо. Ребёнок замучил иконки эти таскать...

Вот пример на Delphi, как включить / отключить все объекты на Рабочем Столе:

Код:

{Disable:}
EnableWindow(FindWindowEx(FindWindow
('Progman', nil), HWND(0), 'ShellDll_DefView', nil),
FALSE) ;

{Enable:}
EnableWindow( FindWindowEx( FindWindow
('Progman', nil), HWND(0), 'ShellDll_DefView', nil),
TRUE) ;