Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Standby unterdrücken (https://www.delphipraxis.net/28820-standby-unterdruecken.html)

Michi27 30. Aug 2004 19:08


Standby unterdrücken
 
Hi,

ich möchte in meinen Programm, welches ständig Daten anzeigt,
das automatische Standby von Windows XP abschalten.

Wenn das Programm nicht läuft dann soll der Standby-Modus von Windows ganz normal
wie in der Systemsteuerung angegeben ablaufen.

Hat jemand eine Idee ?

Ich habe versucht mit SetCursorPos Bewegungen zu simulieren, aber das reicht Windows wohl nicht.


Bis denne


Michael

glkgereon 30. Aug 2004 20:03

Re: Standby unterdrücken
 
kannst du windows nicht min regelmäßigen api-aufrufen am laufen halten?

papierkorb leeren, prozessor/ram daten/auslastung holen oder son schwachsinn....

Vjay 30. Aug 2004 20:40

Re: Standby unterdrücken
 
Delphi-Quellcode:
const
  PBT_APMQUERYSUSPEND      = 0; {Request for permission to suspend.}
 
ins mainform private: procedure WMPOWERBROADCAST (var Message: TMessage); message WM_POWERBROADCAST;


procedure TMainForm.WMPOWERBROADCAST(var Message: TMessage);
begin
 case Message.WParam of
  PBT_APMQUERYSUSPEND:
  begin
   if canSuspend then Message.Result := 1
   else Message.Result := BROADCAST_QUERY_DENY;
  end;
 else defaultHandler( Message);
 end;
end;

Michi27 31. Aug 2004 16:58

Re: Standby unterdrücken
 
Hi,

@Vjay: Das klappt wunderbar , aber leider habe ich schon wieder ein Problem :-( ...

Der Standby Modus wird zwar nicht mehr aktiviert, aber der unter
Systemsteuerung->Energieverwaltung angegebene Zeitrahmen für Monitor aus bleibt davon
unbetroffen. In meinen konkreten Fall schaltet sich der Monitor nach 20 Min auch aus.

Hast du dafür vielleicht einen Tip parat ?

Ich wäre Dir (oder jemanden anderen der dieses Problem lösen kann :-) ) echt dankbar


Bis dann


Michael

Vjay 1. Sep 2004 09:34

Re: Standby unterdrücken
 
Glaube da hilft nur wenn du alle 19 Minuten über mouse_event(...) die Maus um einen Pixel verschiebst.

Memo 1. Sep 2004 10:14

Re: Standby unterdrücken
 
Zitat:

Zitat von Michi27
Der Standby Modus wird zwar nicht mehr aktiviert, aber der unter
Systemsteuerung->Energieverwaltung angegebene Zeitrahmen für Monitor aus bleibt davon
unbetroffen. In meinen konkreten Fall schaltet sich der Monitor nach 20 Min auch aus.

Schau mal hier. Schau auch in die Kommentare, da steht zusätzlich wie man den Energiesparmodus ausschaltet.

Michi27 1. Sep 2004 13:34

Re: Standby unterdrücken
 
Hi,

@Vjay : Werde ich auch noch ausprobieren , Danke :-) !

@Memo : Das Beispeil aus dem Link funktioniert soweit. Aber leider muß, wie auch in den Kommentaren bemerkt,
das Programm im Vordergrund sein. Leider ist das nicht immer so. Das Programm schlummert im Systray
und meldet sich per 'Pop-up' wenn neue Daten eingetroffen sind und stellt diese dar.


Also bin ich noch immer auf der Suche :-D . Hat noch jemand eine Idee ?


Bis dann


Michael


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:11 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz