Source position: dbctrls.pp line 726
protected procedure TDBImage.ActiveChange(
Sender: TObject
); virtual;