Procedure TWPCustomToolCtrl.ScaleButtonHeight(x:Single)Unit: WPCTRRichClass: WPCTRRich.TWPCustomToolCtrlParameters x:Single