DataChange - if the link is active, transmit the changed data
Source position: dbctrls.pp line 993
procedure TDBCalendar.DataChange(
Sender: TObject
);