Code: Select all
If OpenWindow(0, 0, 0, 200, 250, "DateGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
DateGadget(1, 10, 10, 180, 25, "Date: %mm/%dd/%yyyy Time: %hh:%ii", 0) : DateSet = Date() : DateSet - Second(DateSet)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
If GetGadgetState(1) <> DateSet
Debug "DateGadget() edited"
Else
Debug "DateGadget() not edited"
EndIf
EndIf
