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