$PBExportHeader$w_mtrl_configure_ch.srw forward global type w_mtrl_configure_ch from w_publ_base end type type uo_1 from uo_mtrl_configure_ch within w_mtrl_configure_ch end type end forward global type w_mtrl_configure_ch from w_publ_base integer width = 1810 integer height = 1248 string title = "产品配置选择" boolean minbox = false windowtype windowtype = response! uo_1 uo_1 end type global w_mtrl_configure_ch w_mtrl_configure_ch on w_mtrl_configure_ch.create int iCurrent call super::create this.uo_1=create uo_1 iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.uo_1 end on on w_mtrl_configure_ch.destroy call super::destroy destroy(this.uo_1) end on type cb_func from w_publ_base`cb_func within w_mtrl_configure_ch boolean visible = false end type type cb_exit from w_publ_base`cb_exit within w_mtrl_configure_ch boolean visible = false end type type uo_1 from uo_mtrl_configure_ch within w_mtrl_configure_ch integer taborder = 50 boolean bringtotop = true end type on uo_1.destroy call uo_mtrl_configure_ch::destroy end on