PureBoard

Verfasst: **23.11.2005 12:29**

If OpenWindow(0, 0, 0, 200, 250, #PB_Window_SystemMenu|#PB_Window_ScreenCentered,"DateGadget()")
  If CreateGadgetList(WindowID())
    DateGadget(0, 10, 10, 180, 25, "",0,#pb_date_checkbox)
    Repeat: Until WaitWindowEvent() = #PB_Event_CloseWindow
  EndIf
EndIf

Bei nicht gesetztem Häkchen wird das Tagesdatum eingegraut (nicht aktiv) angezeigt.
Ist es möglich, dass bei gesetztem Häkchen das Feld leer dargestellt wird?

Danke.

Verfasst: **23.11.2005 13:03**

so??

Code: Alles auswählen

If OpenWindow(0, 0, 0, 200, 250, #PB_Window_SystemMenu|#PB_Window_ScreenCentered,"DateGadget()") 
  If CreateGadgetList(WindowID()) 
    DateGadget(0, 10, 10, 180, 25, " ",1,#PB_Date_CheckBox)
    Repeat: Until WaitWindowEvent() = #PB_Event_CloseWindow 
  EndIf 
EndIf

Verfasst: **23.11.2005 13:11**

NEIN! So nicht.

Das Feld soll nur leer sein, wenn das Häkchen nicht gesetzt ist.
Wenn das Häkchen gesetzt ist, soll natürlich das Datum angezeigt und editierbar sein.

Verfasst: **23.11.2005 13:20**

So??

Code: Alles auswählen


If OpenWindow(0, 0, 0, 200, 250, #PB_Window_SystemMenu|#PB_Window_ScreenCentered,"DateGadget()")
  If CreateGadgetList(WindowID())
    DateGadget(0, 10, 10, 180, 25, " ",0,#PB_Date_CheckBox) ; Anfänglich ohne Haken und leer
    Repeat
      Event=WaitWindowEvent()
      If Event = #PB_EventGadget
        If GadgetID = 0
          If GetGadgetState(0) ; wenn (Haken gesetzt) dann Haken und Inhalt auf LeerString -> DatumsAnzeige
            SetGadgetText(0,"")
          Else
            SetGadgetText(0," "); sonst (Haken weg) dann Inhalt auf Space -> keine DatumsAnzeige
          EndIf
        EndIf
      EndIf
    Until event= #PB_Event_CloseWindow
  EndIf
EndIf

Verfasst: **23.11.2005 13:25**

Danke, super Idee.
Warum bin ich da nicht selbst drauf gekommen?

Verfasst: **23.11.2005 13:28**

Eventuell hast Du dasselbe Problem.
http://forums.purebasic.com/german/view ... 4113#64113

PureBoard

Frage zum DATEGADGET

Frage zum DATEGADGET