Screensaver Deaktivieren PDF Drucken E-Mail
Benutzerbewertung: / 0
SchwachPerfekt 
Geschrieben von: Alessandro   
Dienstag, 03. November 2009 11:37

function ActivateScreenSaver (Activate: boolean): boolean;
var IntActive: byte;
begin
if Activate then
  IntActive := 1
else
  IntActive := 0;

Result := SystemParametersInfo (SPI_SETSCREENSAVEACTIVE, IntActive, nil, 0) ;
end;

< Zurück   Weiter >