Décoder une date DOS à une chaîne
#include <Date.au3>
_Date_Time_DOSDateTimeToStr ( $iDosDate, $iDosTime )
| $iDosDate | Date MS-DOS, emballés comme suit : Bits 0 à 4 Jour du mois ( 131 ) Bits 5 à 8 mois ( 1 = Janvier, 2 = Février, et ainsi de suite ) Bits 9-15 Année décalage par rapport à 1980 ( ajouter 1980 à obtenir l'année réelle ) |
| $iDosTime | Date MS-DOS, emballés comme suit : Bits 0 à 4 Deuxième divisé par 2 Bits 5-10 Minute ( 059 ) Bits 11-15 heures ( 023 sur une horloge de 24 heures ) |
#include <Date.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Global $g_idMemo
Example()
Func Example()
Local $sDate
; Créer GUI
GUICreate("Time", 400, 300)
$g_idMemo = GUICtrlCreateEdit("", 2, 2, 396, 296, $WS_VSCROLL)
GUICtrlSetFont($g_idMemo, 9, 400, 0, "Courier New")
GUISetState(@SW_SHOW)
; Afficher FAT date / heure
$sDate = _Date_Time_DOSDateTimeToStr(0x3621, 0x944a) ; 01/01/2007 18:34:20
MemoWrite("FAT date/time .: " & $sDate)
; Boucle jusqu'à ce que l'utilisateur quitte.
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==> Example
; Écrire une ligne dans le contrôle mémo
Func MemoWrite($sMessage)
GUICtrlSetData($g_idMemo, $sMessage & @CRLF, 1)
EndFunc ;==> MemoWrite