home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 2006 January / PCWELT_1_2006.ISO / pcwsoft / autoit-v3-setup.exe / Examples / GUICtrlCreateDate.au3 < prev    next >
Encoding:
Text File  |  2005-01-07  |  596 b   |  28 lines
  1. #include <GUIConstants.au3>
  2.  
  3. ; example1
  4. GUICreate ( "My GUI get date", 200,200,800,200)
  5. $date=GUICtrlCreateDate ("1953/04/25", 10,10,185,20 )
  6. GUISetState ()
  7.  
  8. ; Run the GUI until the dialog is closed
  9. Do
  10.     $msg = GUIGetMsg()
  11. Until $msg = $GUI_EVENT_CLOSE
  12.  
  13. MsgBox(0,"Date",GUICtrlRead($date))
  14. GUIDelete()
  15.  
  16. ; example2
  17. $DTS_TIMEFORMAT = 9
  18. GUICreate("My GUI get time")
  19. $n=GUICtrlCreateDate ( "", 20, 20, 100, 20, $DTS_TIMEFORMAT) 
  20. GUISetState ()
  21.  
  22. ; Run the GUI until the dialog is closed
  23. Do
  24.     $msg = GUIGetMsg()
  25. Until $msg = $GUI_EVENT_CLOSE
  26.  
  27. MsgBox(0,"Time", GUICtrlRead($n))
  28.