解码一个 DOS 日期/时间 为一个数组
#Include <Date.au3>
_Date_Time_DOSDateTimeToArray($iDosDate, $iDosTime)
$iDosDate | MS-DOS 日期, 封装为下方格式: 位 0- 4 ,一月中的其中一天(1–31) 位 5- 8 ,月份 (1 = 一月, 2 = 二月, 等等) 位 9-15 ,相对 1980 的偏移量(加上1980得到实际年份) |
$iDosTime | MS-DOS 时间, 封装为下方格式: 位 0- 4 ,按2分开的秒(Second divided by 2) 位 5-10 ,分钟 (0–59) 位 11-15 ,时钟 (0–23 于 24 小时计时) |
#include <GUIConstantsEx.au3>
#include <Date.au3>
#include <WindowsConstants.au3>
Global $iMemo
_Main()
Func _Main()
Local $aDate
; 创建 GUI
GUICreate("Time", 400, 300)
$iMemo = GUICtrlCreateEdit("", 2, 2, 396, 296, $WS_VSCROLL)
GUICtrlSetFont($iMemo, 9, 400, 0, "Courier New")
GUISetState()
; 显示 FAT 日期/时间
$aDate = _Date_Time_DOSDateTimeToArray(0x3621, 0x944a) ; 01/01/2007 18:34:20
MemoWrite("FAT date .: " & StringFormat("%02d/%02d/%04d", $aDate[0], $aDate[1], $aDate[2]))
MemoWrite("FAT time .: " & StringFormat("%02d:%02d:%02d", $aDate[3], $aDate[4], $aDate[5]))
; 循环直到用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
; 写入一行到 memo 控件
Func MemoWrite($sMessage)
GUICtrlSetData($iMemo, $sMessage & @CRLF, 1)
EndFunc ;==>MemoWrite