Delphi Bildschirmschoner verhindern

Bildschirmschoner verhindern

Ein Thema von Mister X · begonnen am 11. Sep 2005 · letzter Beitrag vom 1. Aug 2006

Registriert seit: 4. Aug 2005
Ort: Salzburg
91 Beiträge

Delphi 6 Professional

11. Sep 2005, 16:24

Um den Bildschirmschoner zu deaktivieren musst du folgendes coden:

Delphi-Quellcode:

			procedure TForm1.FormCreate(Sender: TObject);

begin

 SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, 0, nil, 0);

end;

Und um ihn wieder zu aktivieren:

Delphi-Quellcode:

			procedure TForm1.FormDestroy(Sender: TObject);

begin

SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, 1, nil, 0);

end;

Mfg st0rm

Es ist dir nicht erlaubt, neue Themen zu verfassen.

Es ist dir nicht erlaubt, auf Beiträge zu antworten.

Es ist dir nicht erlaubt, Anhänge hochzuladen.

Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.

Smileys sind an.

[IMG] Code ist an.

HTML-Code ist aus.

Refbacks are aus

Gehe zu: