123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269 |
- $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
|