Add(MainForm,382254,252,168)
{
 Height=107
 Caption="Изменение даты установки Windows"
 BorderStyle=1
}
Add(DateDiff,16762688,427,308)
{
 link(onCalc,2448422:doRead,[])
 link(DateTime2,2504144:DateTime,[])
}
Add(DatePicker,2504144,434,245)
{
 Left=120
 Top=10
 Width=140
 Height=21
 Point(DateTime)
 Point(CurrentDateTime)
}
Add(DoData,2250526,371,308)
{
 Data=Real(719163)
 link(onEventData,16762688:doCalc,[])
}
Add(Registry,2448422,483,308)
{
 HKey=2
 Key="SOFTWAREMicrosoftWindows NTCurrentVersion"
 Value="InstallDate"
 DataType=0
}
Add(Label,10507119,301,168)
{
 Top=35
 Width=392
 Height=17
 Font=[MS Sans Serif,8,1,255,1]
 Caption="Нажатие кнопки "Установить" изменит дату установки Windows"
}
Add(StyleXP,16043928,301,252)
{
}
Add(Label,5226136,301,210)
{
 Left=20
 Top=15
 Width=88
 Height=17
 Caption="Дата установки:"
}
Add(Button,16246817,308,308)
{
 Left=265
 Top=10
 Width=120
 Caption="Установить"
 link(onClick,2250526:doData,[])
}