ElsonJ,
Thank you, good thought, but that did not work.
It gave me exactly the same results as putting the text in the object editor. Assigning the below string to the button caption gave me "RangeExpand Current".
ToggleBox2.Caption:= 'Expand Current' + #13 + 'Range';
Autosize property was set to true.
Note: also tried #10, then #13#10 - no difference