$PBExportHeader$w_model_fx.srw $PBExportComments$分销系统--packet打开模型 forward global type w_model_fx from w_publ_base_style end type type cb_accept from uo_imflatbutton within w_model_fx end type type cb_reject from uo_imflatbutton within w_model_fx end type type dw_main from datawindow within w_model_fx end type type st_1 from statictext within w_model_fx end type type mle_summary from multilineedit within w_model_fx end type type st_2 from statictext within w_model_fx end type type mle_postscript from multilineedit within w_model_fx end type type st_3 from statictext within w_model_fx end type type mle_remark from multilineedit within w_model_fx end type end forward global type w_model_fx from w_publ_base_style integer width = 3799 integer height = 2396 string title = "" boolean maxbox = true boolean resizable = true long backcolor = 16777215 string icon = "graphics\chain_link_128px.ico" boolean center = true cb_accept cb_accept cb_reject cb_reject dw_main dw_main st_1 st_1 mle_summary mle_summary st_2 st_2 mle_postscript mle_postscript st_3 st_3 mle_remark mle_remark end type global w_model_fx w_model_fx type variables s_open_packet s_tran end variables on w_model_fx.create int iCurrent call super::create this.cb_accept=create cb_accept this.cb_reject=create cb_reject this.dw_main=create dw_main this.st_1=create st_1 this.mle_summary=create mle_summary this.st_2=create st_2 this.mle_postscript=create mle_postscript this.st_3=create st_3 this.mle_remark=create mle_remark iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.cb_accept this.Control[iCurrent+2]=this.cb_reject this.Control[iCurrent+3]=this.dw_main this.Control[iCurrent+4]=this.st_1 this.Control[iCurrent+5]=this.mle_summary this.Control[iCurrent+6]=this.st_2 this.Control[iCurrent+7]=this.mle_postscript this.Control[iCurrent+8]=this.st_3 this.Control[iCurrent+9]=this.mle_remark end on on w_model_fx.destroy call super::destroy destroy(this.cb_accept) destroy(this.cb_reject) destroy(this.dw_main) destroy(this.st_1) destroy(this.mle_summary) destroy(this.st_2) destroy(this.mle_postscript) destroy(this.st_3) destroy(this.mle_remark) end on event open;call super::open;s_tran = Message.PowerObjectParm if IsNUll(s_tran) then MessageBox('提示', '打开方式有误,SN号为空') Close(this) return end if //dw_tempoutwaremx = tab_1.tabpage_1.dw_tempoutwaremx mle_summary.Text = s_tran.summary mle_postscript.Text = s_tran.postscript mle_remark.Text = s_tran.remark //retrieve end event event resize;call super::resize;if (this.Width < 3762) then this.Width = 3762 if (this.Height < 2292) then this.Height = 2292 mle_summary.Width = this.workspacewidth( ) - mle_summary.X - 14 mle_postscript.Width = mle_summary.Width mle_remark.Width = mle_summary.Width end event type cb_func from w_publ_base_style`cb_func within w_model_fx boolean visible = false end type type cb_exit from w_publ_base_style`cb_exit within w_model_fx integer x = 549 end type type ln_bar from w_publ_base_style`ln_bar within w_model_fx end type type ln_bar2 from w_publ_base_style`ln_bar2 within w_model_fx end type type r_bar from w_publ_base_style`r_bar within w_model_fx end type type cb_accept from uo_imflatbutton within w_model_fx integer width = 384 integer height = 164 integer taborder = 30 boolean bringtotop = true string text = "确认本次报价" string normalpicname = "ok.bmp" integer picsize = 16 toolbaralignment pic_align = alignattop! boolean border = false end type type cb_reject from uo_imflatbutton within w_model_fx integer x = 384 integer width = 165 integer height = 164 integer taborder = 30 boolean bringtotop = true string text = "拒绝" string normalpicname = "DELETE.BMP" integer picsize = 16 toolbaralignment pic_align = alignattop! boolean border = false end type type dw_main from datawindow within w_model_fx integer y = 172 integer width = 1801 integer height = 1104 integer taborder = 20 boolean bringtotop = true string title = "none" boolean livescroll = true end type type st_1 from statictext within w_model_fx integer x = 1824 integer y = 172 integer width = 146 integer height = 48 boolean bringtotop = true integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 16777215 string text = "摘要" boolean focusrectangle = false end type type mle_summary from multilineedit within w_model_fx integer x = 1824 integer y = 232 integer width = 1929 integer height = 300 integer taborder = 30 boolean bringtotop = true integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 boolean vscrollbar = true boolean autovscroll = true end type type st_2 from statictext within w_model_fx integer x = 1824 integer y = 548 integer width = 146 integer height = 48 boolean bringtotop = true integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 16777215 string text = "附言" boolean focusrectangle = false end type type mle_postscript from multilineedit within w_model_fx integer x = 1824 integer y = 604 integer width = 1929 integer height = 300 integer taborder = 40 boolean bringtotop = true integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 boolean vscrollbar = true boolean autovscroll = true end type type st_3 from statictext within w_model_fx integer x = 1824 integer y = 916 integer width = 146 integer height = 48 boolean bringtotop = true integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 16777215 string text = "备注" boolean focusrectangle = false end type type mle_remark from multilineedit within w_model_fx integer x = 1824 integer y = 976 integer width = 1929 integer height = 300 integer taborder = 40 boolean bringtotop = true integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 boolean vscrollbar = true boolean autovscroll = true end type