Ribbon Control: Expand/Collapse

It is already there, set AdvToolBarPager.HidePagesOnDblClick := false