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