Source position: db.pas line 2120
type TDataChangeEvent = procedure(
Sender: TObject;
Field: TField
) of object;