TTntEditDelete Class
procedure UpdateTarget(Target: TObject); override;
This is UpdateTarget, a member of class TTntEditDelete.