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