#cs
	Name: WinDATE
	Version: 0.1
	Copyright: WEB-SOFT (DjDominik)
	Website: www.websoft.bplaced.net
#ce

;~ Anfang der Includes
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Date.au3>
;~ Ende der Includes

;~ Anfang des GUI-Codes
$Gui = GUICreate("WinDATE", 256, 75, 192, 114, -1, BitOR($WS_EX_TOOLWINDOW, $WS_EX_WINDOWEDGE))
GUICtrlCreateGroup("Installations-Datum von Windows", 8, 8, 241, 57)
$Box = GUICtrlCreateInput("", 16, 32, 225, 21, BitOR($ES_AUTOHSCROLL, $ES_READONLY))
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
;~ Ende des GUI-Codes

$sUnixInstall = RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\", "InstallDate")
GUICtrlSetData($Box, _DateTimeFormat(_DateAdd('s', $sUnixInstall, "1970/01/01 01:00:00"), 0))


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd