Damit der erste Button unter Windows XP (sp2) auch funktioniert, müsste
SendMessage(GetDesktopWindow(), WM_SYSCOMMAND, SC_MONITORPOWER, 1);
in
Delphi-Quellcode:
SendMessage(FindWindow('Progman', 'Program Manager'),
WM_SYSCOMMAND, SC_MONITORPOWER, 1);
geändert werden.
Grund: das '#32769'-Desktop-Fenster (csrss), reagiert nicht (mehr) auf die Nachricht - das 'Progman'-Desktop-Fenster (shell-explorer) reagiert allerdings wie erwartet...