Цитата haav (
)
Посмотри на функцию SetStateCalendar
А как она может установить время в DateCalendarGadget?
В принципе, для чистого WinApi разобрался:
Код
SMD=CreateWindowEx(0, "SysDateTimePick32", "",WS_VISIBLE Or WS_CHILD Or DTS_TIMEFORMAT Or DTS_UPDOWN, 220,30,80,20, h, Cast(HMENU,2), 0, 0)
Dim ST As SYSTEMTIME
ST.wYear=2000
ST.wmonth=1
ST.wday=1
ST.wHour=0
ST.wMinute=1
ST.wSecond=0
Dim s As String
s = "HH" & ":" & "mm" & ":" & "ss"
SendMessage(SMD, DTM_SETFORMATW,0, Cast(LPARAM,@s))
SendMessage(SMD,DTM_SETSYSTEMTIME,0,Cast(LPARAM,@ST))
