Procedure TWPToolbar.UpdateObj(UpdateObjp:TComponent; Typ:TWpSelNr; str:string; num:Integer)Unit: WPTbarClass: WPTbar.TWPToolbarParameters UpdateObjp:TComponent Typ:TWpSelNr str:string num:Integer