Hey wie ich dir schon ICQ geschrieben habe kannst du es so machen:
Delphi-Quellcode:
procedure SetScreensaverTime(TimeOut: integer);
const
SixtySeconds = 60;
begin;
SystemParametersInfo(SPI_SETSCREENSAVETIMEOUT,SixtySeconds * TimeOut, nil, SPIF_SENDWININICHANGE);
end;
Dann übernimmt Windows alles für dich.
Das hier trotzdem noch mal, vllt hat ja Jemand noch mal das Problem.