How long since coming out of standby?
Posted: Sun Dec 24, 2017 11:11 pm
My app needs to know how long it's been since my PC came out of standby. Any ideas on how to test for that? Thanks.
http://www.purebasic.com
https://www.purebasic.fr/english/
Code: Select all
Global awake
Procedure Callback(hWnd,Message,wParam,lParam)
result=#PB_ProcessPureBasicEvents
If Message=#WM_POWERBROADCAST
Select wParam
Case #PBT_APMRESUMESUSPEND
awake=Date()
Case #PBT_APMSUSPEND
awake=0
EndSelect
EndIf
ProcedureReturn result
EndProcedure
OpenWindow(0,200,200,200,100,"Time awake",#PB_Window_SystemMenu)
TextGadget(0,10,10,180,180,"")
SetWindowCallback(@Callback(),0)
Repeat
ev=WindowEvent()
If ev=0
Sleep_(500)
If awake
SetGadgetText(0,Str(Date()-awake))
EndIf
EndIf
Until ev=#PB_Event_CloseWindow