für die Anzeige von Datum und Zeit mit Hilfe von SysDateTimePick32 werden die aktuellen Zeiten angegeben. Als Beispiel:
Code: Alles auswählen
Structure INITCOMMONCONTROLSEX
dwSize.l
dwICC.l
EndStructure
InitICC.INITCOMMONCONTROLSEX
InitICC\dwSize = SizeOf(INITCOMMONCONTROLSEX)
InitICC\dwICC = #ICC_DATE_CLASSES
InitCommonControlsEx_(InitICC)
OpenWindow(0,200,200,200,200,#PB_Window_SystemMenu,"test")
If CreateGadgetList(WindowID())
picker1=CreateWindowEx_(0,"SysDateTimePick32","",#WS_CHILD|#WS_VISIBLE|12+2,10,10,100,25,WindowID(),0,GetModuleHandle_(0),0)
picker2=CreateWindowEx_(0,"SysDateTimePick32","",#WS_CHILD|#WS_VISIBLE|12,10,40,100,25,WindowID(),0,GetModuleHandle_(0),0)
EndIf
Repeat
EventID=WaitWindowEvent()
Until EventID=#PB_EventCloseWindow
CloseWindow(0)
Da in meinem Programm der Anwender eine Zeit setzen kann, soll beim Start nicht die aktuelle Zeit, sondern nur "00:00:00" dargestellt werden.
Wie kann ich sie setzen?
Dankesgruß, Häns
[Edit]
Mmmh, ok, habe mal im englischen Board etwas gefunden und ein bisschen damit herumgespielt. Dabei ist das herausgekommen:
Code: Alles auswählen
OpenWindow(0,100,200,400,200,"test",#PB_Window_SystemMenu)
CreateGadgetList(WindowID(0))
DateGadget(2,10,80,100,20,"",0 ,#DTS_TIMEFORMAT)
Repeat : Until WaitWindowEvent()=#PB_Event_CloseWindow
Code: Alles auswählen
DateGadget(1,10,60,100,20,"",#PB_Date_CheckBox ,#DTS_TIMEFORMAT)
Vielleicht kann mir einer das erklären, denn zwischen der Option Date und CheckBox kann ich mir keinen Reim daraus machen...
Häns