Add(DatePicker,4737300,231,385)
{
 Left=410
 Top=135
 Width=120
 Height=21
 Font=[Tahoma,10,0,0,204]
 Point(DateTime)
 Point(DateInt)
}