UpdateData copy changed data into the text fileld
Source position: dbctrls.pp line 995
procedure TDBCalendar.UpdateData(
Sender: TObject
);