UnitQESBPCSGlobals
Declaration
TESBChangeEvent = procedure (Sender: TObject; const ElementNo: LongWord) of object;