Applies toTESBBaseEdit
DeclarationTStartDragEvent = Procedure(Sender: TObject; var DragObject: TDragObject) of object;