Procedure TWPToolbar.ScaleButtonHeight(x:Single)Unit: WPTbarClass: WPTbar.TWPToolbarParameters x:Single