Add(MainForm,2953706,35,175)
{
 Width=436
 Height=214
}
Add(DatePicker,14571365,175,175)
{
 Left=95
 Top=40
 Width=130
 Height=21
 Point(DateTime)
 Point(DateInt)
}
Add(DatePicker,6470222,105,175)
{
 Left=120
 Top=90
 Width=115
 Height=21
 Point(DateTime)
 Point(CurrentDateInt)
}
Add(MathParse,6360888,112,231)
{
 MathStr="(%1 - %2) div 355"
 Point(reCalc)
 link(onResult,12696030:doText,[])
 link(X1,6470222:CurrentDateInt,[])
 link(X2,14571365:DateInt,[(125,219)(188,219)])
}
Add(Edit,12696030,174,231)
{
 Left=325
 Top=40
 Width=70
 Name="Возраст"
 Text=""
}
Add(Button,4626669,35,231)
{
 Left=45
 Top=130
 link(onClick,6360888:doCalc,[])
}
Add(Label,6148359,175,140)
{
 Left=10
 Top=45
 Width=85
 Caption="Дата рождения:"
}
Add(Label,12816990,105,140)
{
 Left=10
 Top=90
 Width=110
 Caption="Дата исследования:"
}
Add(Label,9042239,224,231)
{
 Left=275
 Top=45
 Caption="Возраст:"
}