TDataChangeEvent = procedure (Sender: TObject; Field: TField) of object;
(Sender: TObject; Field: TField) ( TDataChangeEvent)();
DB
This is type DB.TDataChangeEvent.