[angvelem]

Стоит проверка такого вида:

Код:

    WM_SYSCOMMAND :
    begin
      case wParam of
        SC_SCREENSAVE,
        SC_MONITORPOWER : Exit;
      end;
    end;

если пытается включается скринсэйвер или гаснет монитор, послать систему (ОС) погулять.