Seite 1 von 1

DateGadget auf Änderung prüfen

Verfasst: 10.12.2007 20:53
von 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]

Verfasst: 10.12.2007 22:06
von 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...

Verfasst: 11.12.2007 00:45
von edel
Thomas hat geschrieben: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