Tomar control del escritorio de Win2000

[diegofhernando]

puedes HABILITAR e INHABILITAR el escritorio de windows usando este codigo:

 EnableWindow(FindWindow('Shell_TrayWnd', nil), False);

EnableWindow(FindWindowEx(FindWindow('Progman', nil), 0, 'ShellDll_DefView',  nil), False);

para habilitar:

EnableWindow(FindWindow('Shell_TrayWnd', nil), True);

EnableWindow(FindWindowEx(FindWindow('Progman', nil), 0, 'ShellDll_DefView',  nil), True);