DateGadget ohne Datum

[gnaps]

Hallo,

ok umgesetzt. Ist die beste Lösung. Danke

jetzt noch was:
habe im im vierten Datumsfeld z.B. 25.03.2015 stehen,

wie übergebe ich jetzt das datum dem CalendarGadget(#kalender,0,0,KalenderW.i,kalenderH.i,>hier<)
wie muss ich das formatieren.

[RSBasic]

Code: Alles auswählen

EnableExplicit

Define EventID
Define Date$ = "25.03.2015"

If OpenWindow(0,0,0,500,400,"Window",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
  CalendarGadget(1,10,10,200,200)
  SetGadgetState(1,ParseDate("%dd.%mm.%yyyy", Date$))
  
  Repeat
    EventID=WaitWindowEvent()
    If EventID = #PB_Event_CloseWindow
      End
    EndIf
  ForEver
EndIf

[X360 Andy]

Ich löse das Problem immer so, das ich das DateGadget so klein mache, das nur das Feld zum aufklappen sichtbar ist wo der Benutzer drücken kann.

Dann fange ich eben das Event ab wenn im DateGadget was geändert wurde, und setzte es in das direkt neben dem DateGadget platzierte StringGadget ein.

Grüße

Andreas