Convertit MS-DOS valeurs date et heure à une heure de fichier
#include <Date.au3>
_Date_Time_DOSDateTimeToFileTime ( $iFatDate, $iFatTime )
| $iFatDate | La date de 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 ) |
| $iFatTime | Temps Ths MS- DOS, emballé 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 $pFileTime1, $tFileTime1, $pFileTime2, $tFileTime2
; 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)
; Comparer FAT dates / heures
$tFileTime1 = _Date_Time_DOSDateTimeToFileTime(0x3621, 0x11EF) ; 01/01/2007 2:15:30
$tFileTime2 = _Date_Time_DOSDateTimeToFileTime(0x379F, 0x944A) ; 12/31/2007 18:34:20
$pFileTime1 = DllStructGetPtr($tFileTime1)
$pFileTime2 = DllStructGetPtr($tFileTime2)
MemoWrite("Result 1: " & _Date_Time_CompareFileTime($pFileTime1, $pFileTime2))
MemoWrite("Result 2: " & _Date_Time_CompareFileTime($pFileTime1, $pFileTime1))
MemoWrite("Result 3: " & _Date_Time_CompareFileTime($pFileTime2, $pFileTime1))
; 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