TdxUnDockEvent = procedure(Sender: TdxCustomDockControl; Site: TdxCustomDockControl) of object;