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