Créer un fichier lors de la fermeture de windows
Publié : lun. 01/févr./2016 22:40
Ce code permet de créer un fichier quand windows est en cours de fermeture. Ce code est il suffisamment secure ?
Code : Tout sélectionner
Procedure WinCallback(hWnd, uMsg, wParam, lParam)
Protected result = #PB_ProcessPureBasicEvents
Select uMsg
Case #WM_ENDSESSION, #WM_CLOSE
CreateFile(0, "test.txt")
WriteString(0, "Fermeture")
CloseFile(0)
EndSelect
ProcedureReturn result
EndProcedure
If OpenWindow(0, 0, 0, 400, 400, "#WM_ENDSESSION", #PB_Window_MinimizeGadget|#PB_Window_MaximizeGadget|#PB_Window_ScreenCentered)
SetWindowCallback(@WinCallback())
Repeat
Select WaitWindowEvent()
Case #PB_Event_CloseWindow
End
EndSelect
ForEver
EndIf