DateGadget auf Änderung prüfen

[ThoPie]

Hallo,

gibt es eine Möglichkeit ein DateGaget auf Veränderungen zu prüfen?

Code: Alles auswählen

PB_EventType_Change

funktioniert ja leider nicht. Bei ComboBoxes gibt es

Code: Alles auswählen

#CBN_SELCHANGE

Gibt es vielleicht auch hier etwas?
Vielen Dank.[/code]

[Thomas]

Wieso machst du es so kompliziert?

Frag doch einfach ganz am Anfang ab, was drinnen steht, und wenn wenn es einen Event gibt ...
dann vergleichst du das vom Anfang, und das was jetzt drinnen steht...

[edel]

Wieso machst du es so kompliziert?

Frag doch einfach ganz am Anfang ab, was drinnen steht, und wenn wenn es einen Event gibt ...
dann vergleichst du das vom Anfang, und das was jetzt drinnen steht...

Weil das Bloedsinn ist.

Unter Windows koennte man es so machen :

Code: Alles auswählen

Procedure callback(h,m,w,p)
  Protected *notify.NMDATETIMECHANGE 
  
  If m = #WM_NOTIFY
    *notify = p
    If *notify\nmhdr\code = #DTN_DATETIMECHANGE And GadgetID(0) = *notify\nmhdr\hwndfrom
      Debug "change"
    EndIf     
  EndIf 

  ProcedureReturn #PB_ProcessPureBasicEvents
EndProcedure
  
If OpenWindow(0, 0, 0, 200, 250, "DateGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  SetWindowCallback(@callback())
  If CreateGadgetList(WindowID(0))      
    DateGadget(0, 10, 10, 180, 25, "Datum: %mm/%dd/%yyyy Zeit: %hh:%ii")
    Repeat: Until WaitWindowEvent() = #PB_Event_CloseWindow
  EndIf
EndIf