ActiveChange - if datalink is active, send back new picture
Source position: dbctrls.pp line 977
protected procedure TDBImage.ActiveChange(
Sender: TObject
); virtual;