Einzelnen Beitrag anzeigen

schwa226

Registriert seit: 4. Apr 2008
400 Beiträge
 
#14

Re: Windows 7 Standby/Hibernate Phänomen

  Alt 20. Nov 2009, 22:03
Kann es noch daran liegen, dass ich in der Procedure (die in der DummyApp) die WM_POWERBROADCAST Message erhält auch das Sendmessage ausführe?
Währe es besser Sendmessage erst nach einem kurzen Delay auszuführen?
Also die DummyApp Message Procedure durchlaufen lassen und z.B. Timer mit z.B. 100ms starten.
Wenn der Timer auslößt dann erst die Sendmessage zum Client.

Weiß aber nicht wie ich dann den Resume abfangen soll. Da kommen ja zwei Meldungen fast zur gleichen Zeit.

EDIT:
Habe jetzt folgendes probiert:
Delphi-Quellcode:
type
  TSendMessageThread = class(TThread)
    private
      fWParam : Cardinal;
      fHWnd: HWND;
    protected
      procedure Execute; override;
    public
      constructor Create(hWnd : HWND; WParam: Cardinal); virtual;
  end;

procedure TSendMessageThread.Execute;
begin
  PostMessage(fHWnd, PowerMessage, fWParam,0);
  Terminate;
end;

constructor TSendMessageThread.Create(hWnd : HWND; WParam: Cardinal);
begin
inherited Create(True);
  fWParam := WParam;
  fHWnd := hWnd;
  Resume;
end;
Also wenn meine DummyApp eine PowerMessage bekommt wird einfach per:
TSendMessageThread.Create(TempClientHandles[i],MyMessage.WParam); Ein Thread erzeugt der per Postmessage die Nachricht weiterleitet und sich dann selber gleich wieder beendet.

DummyApp:
Code:
22:30:15 Client: Add 919140 to list
22:30:45 WMPowerBroadcast: WM_POWERBROADCAST message, WParm: 4
22:30:45 WMPowerBroadcast: try to send message to client 1: 919140
22:30:45 WMPowerBroadcast: message got sent to client 1: 919140
22:34:12 WMPowerBroadcast: WM_POWERBROADCAST message, WParm: 18
22:34:12 WMPowerBroadcast: try to send message to client 1: 919140
22:34:12 WMPowerBroadcast: message got sent to client 1: 919140
22:34:12 WMPowerBroadcast: WM_POWERBROADCAST message, WParm: 7
22:34:13 WMPowerBroadcast: try to send message to client 1: 919140
22:34:14 WMPowerBroadcast: message got sent to client 1: 919140
Client:
Code:
22:34:14 WndMethod: PowerMessage received: WParam: 4
22:34:14 WndMethod: PBT_APMSUSPEND
22:34:14 WndMethod: PowerMessage received: WParam: 18
22:34:14 WndMethod: PBT_APMRESUMEAUTOMATIC
22:34:14 WndMethod: PowerMessage received: WParam: 7
22:34:14 WndMethod: PBT_APMRESUMEAUTOMATIC
Die Nachricht kommt trotzdem erst nach dem Standby beim Client an.
Delphi 2010, Update 4 & 5
  Mit Zitat antworten Zitat