kann rasch wer was für mich testen ??? [gelöst]

[CTV]

ich versuche raus zufinden ob die msg.Wparam und msg.msg die selben Werte haben für den powerbutton in unterschidlichen betriebssystemen.

ich hab hier einen source gemacht welcher das ausschalten ded pcs mit dem powerknopf verhindet und diese Werte ausgibt. Ihr könnt ein neues Projekt machen und einfach den source hier dort rein kopieren dann das teil starten und dann auf den poweknof drücken und mir dann sagen was ihr für Werte für MSG und WParam bekommen habt. Danke für eure Hilfe

PS. Macht das nur wenn ihr ein ATX Fehiges Board habt (Pentium3 höher) sonst schaltet der pc dann doch aus :)

Delphi-Quellcode:

interface 


uses 
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls; 

type 
  TForm1 = class(TForm) 
    procedure WMPOWERBROADCAST( var Message: TMessage); message WM_POWERBROADCAST; 
    procedure WMPOWER( var Message: TMessage); message WM_POWER; 
  private 

    { Private-Deklarationen } 
  public 
    { Public-Deklarationen } 
  end; 

var 
  Form1: TForm1; 

implementation 

{$R *.DFM} 

procedure TForm1.WMPOWER( var Message: TMessage);  //win95/98 
begin 
  if Message.WParam=PWR_SUSPENDREQUEST then 
  begin 
    Message.Result := PWR_FAIL; 
    showmessage('MSG ='+inttostr(message.msg)); 
    showmessage('WParam ='+inttostr(message.WParam)); 
  end; 
end; 


procedure TForm1.WMPOWERBROADCAST( var Message: TMessage); //womMZ,2000,XP 
begin 
  if Message.WParam = 0 then 
  begin 
    Message.Result := BROADCAST_QUERY_DENY; 
    showmessage('MSG ='+inttostr(message.msg)); 
    showmessage('WParam ='+inttostr(message.WParam)); 
  end; 
end; 

end.

Greetz Cyrus

[ims]

hi cyrus

hab folgende werte bekommen:

MSG = 536
WParam = 0

hab WinXP Prof, SP1, div Hotfixes...

hoffe das hilft dir weiter...

gruss, dave

[CTV]

Mein Testwert:

Zitat:

OS: Win2000 Pro SP 3
MSG: 536
WParam: 0

Greetz Cyrus

[CTV]

thx fürs testen @ims ez muss es nur nocha uf win95/98 auch so sein dann bin ich begeistert :)

[ims]

bist aber ein genügsamer mensch :wink:

win95 oder 98 hab ich leider nicht zur hand...

gruss, dave

[CTV]

hat keiner einen win98/98 Rechner um das für mich rasch zu testen ?

greetz Cyrus

[sakura]

Zitat:

Zitat von CTV

hat keiner einen win98/98 Rechner um das für mich rasch zu testen ?

Gedulde Dich bitte einfach mal einen Moment. Du kannst gerne in 24 Stunden wieder nachfragen, wenn keiner geantwortet hat.

...:cat:...

[Christian Seehase]

Moin CTV,

warum lässt Du Dir nícht einfach die Werte der Konstanten anzeigen?

[CTV]

@sakura
ich bin eben voll im element und will das ez rausfinden aber ich muss mich wohl gedulden tut mir leid wenn ich zu fest gestresst hab.

@Christian Seehase
Hab ich schon gemacht jedoch weiss ich ned ob die Konstantenwerte von OS zu OS verschiden sind

Greetz Cyrus

[Christian Seehase]

Moin CTV,

irgendwo musst Du ja die Bedeutung der Konstanten herhaben, vermutlich aus dem PSDK, und dort ist auch dokumentiert für welche OS sie definiert wurden ;-)