Procedure TWPToolbar.AddControl(comp:TControl)Unit: WPTbarClass: WPTbar.TWPToolbarParameters comp:TControl