Applies toTESBBaseEdit
DeclarationTEndDragEvent = Procedure(Sender, Target: TObject; X, Y: Integer) of object;