123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237 |
- $PBExportHeader$w_rp3.srw
- forward
- global type w_rp3 from w_publ_choice
- end type
- type cb_1 from uo_imflatbutton within w_rp3
- end type
- type cb_2 from uo_imflatbutton within w_rp3
- end type
- type cb_3 from uo_imflatbutton within w_rp3
- end type
- type cb_4 from uo_imflatbutton within w_rp3
- end type
- type cb_5 from uo_imflatbutton within w_rp3
- end type
- type cb_6 from uo_imflatbutton within w_rp3
- end type
- type cb_7 from uo_imflatbutton within w_rp3
- end type
- type cb_8 from uo_imflatbutton within w_rp3
- end type
- type dw_1 from u_dw_rbtnfilter within w_rp3
- end type
- end forward
- global type w_rp3 from w_publ_choice
- integer width = 3040
- string title = "w_rp3"
- cb_1 cb_1
- cb_2 cb_2
- cb_3 cb_3
- cb_4 cb_4
- cb_5 cb_5
- cb_6 cb_6
- cb_7 cb_7
- cb_8 cb_8
- dw_1 dw_1
- end type
- global w_rp3 w_rp3
- on w_rp3.create
- int iCurrent
- call super::create
- this.cb_1=create cb_1
- this.cb_2=create cb_2
- this.cb_3=create cb_3
- this.cb_4=create cb_4
- this.cb_5=create cb_5
- this.cb_6=create cb_6
- this.cb_7=create cb_7
- this.cb_8=create cb_8
- this.dw_1=create dw_1
- iCurrent=UpperBound(this.Control)
- this.Control[iCurrent+1]=this.cb_1
- this.Control[iCurrent+2]=this.cb_2
- this.Control[iCurrent+3]=this.cb_3
- this.Control[iCurrent+4]=this.cb_4
- this.Control[iCurrent+5]=this.cb_5
- this.Control[iCurrent+6]=this.cb_6
- this.Control[iCurrent+7]=this.cb_7
- this.Control[iCurrent+8]=this.cb_8
- this.Control[iCurrent+9]=this.dw_1
- end on
- on w_rp3.destroy
- call super::destroy
- destroy(this.cb_1)
- destroy(this.cb_2)
- destroy(this.cb_3)
- destroy(this.cb_4)
- destroy(this.cb_5)
- destroy(this.cb_6)
- destroy(this.cb_7)
- destroy(this.cb_8)
- destroy(this.dw_1)
- end on
- type cb_func from w_publ_choice`cb_func within w_rp3
- boolean visible = false
- end type
- type cb_exit from w_publ_choice`cb_exit within w_rp3
- boolean visible = false
- end type
- type sle_ch from w_publ_choice`sle_ch within w_rp3
- boolean visible = false
- end type
- type dw_ch from w_publ_choice`dw_ch within w_rp3
- boolean visible = false
- end type
- type st_1 from w_publ_choice`st_1 within w_rp3
- boolean visible = false
- end type
- type cb_retrieve from w_publ_choice`cb_retrieve within w_rp3
- boolean visible = false
- end type
- type cb_choice from w_publ_choice`cb_choice within w_rp3
- boolean visible = false
- end type
- type ln_bar from w_publ_choice`ln_bar within w_rp3
- end type
- type ln_bar2 from w_publ_choice`ln_bar2 within w_rp3
- end type
- type r_bar from w_publ_choice`r_bar within w_rp3
- end type
- type ln_1 from w_publ_choice`ln_1 within w_rp3
- end type
- type ln_2 from w_publ_choice`ln_2 within w_rp3
- end type
- type cb_1 from uo_imflatbutton within w_rp3
- integer x = 9
- integer width = 151
- integer height = 164
- integer taborder = 130
- boolean bringtotop = true
- string text = "刷新"
- string normalpicname = "refresh.bmp"
- integer picsize = 16
- toolbaralignment pic_align = alignattop!
- boolean border = false
- end type
- type cb_2 from uo_imflatbutton within w_rp3
- integer x = 174
- integer y = 4
- integer width = 192
- integer height = 164
- integer taborder = 180
- boolean bringtotop = true
- string text = "新建&S"
- string normalpicname = "new.bmp"
- integer picsize = 16
- toolbaralignment pic_align = alignattop!
- boolean border = false
- end type
- type cb_3 from uo_imflatbutton within w_rp3
- integer x = 366
- integer y = 4
- integer width = 192
- integer height = 164
- integer taborder = 190
- boolean bringtotop = true
- string text = "修改&E"
- string normalpicname = "open.bmp"
- integer picsize = 16
- toolbaralignment pic_align = alignattop!
- boolean border = false
- end type
- type cb_4 from uo_imflatbutton within w_rp3
- integer x = 558
- integer y = 4
- integer width = 151
- integer height = 164
- integer taborder = 200
- boolean bringtotop = true
- string text = "删除"
- string normalpicname = "delete.bmp"
- integer picsize = 16
- toolbaralignment pic_align = alignattop!
- boolean border = false
- end type
- type cb_5 from uo_imflatbutton within w_rp3
- integer x = 1038
- integer width = 151
- integer height = 164
- integer taborder = 130
- boolean bringtotop = true
- string text = "刷新"
- string normalpicname = "refresh.bmp"
- integer picsize = 16
- toolbaralignment pic_align = alignattop!
- boolean border = false
- end type
- type cb_6 from uo_imflatbutton within w_rp3
- integer x = 1202
- integer y = 4
- integer width = 192
- integer height = 164
- integer taborder = 180
- boolean bringtotop = true
- string text = "新建&S"
- string normalpicname = "new.bmp"
- integer picsize = 16
- toolbaralignment pic_align = alignattop!
- boolean border = false
- end type
- type cb_7 from uo_imflatbutton within w_rp3
- integer x = 1394
- integer y = 4
- integer width = 192
- integer height = 164
- integer taborder = 190
- boolean bringtotop = true
- string text = "修改&E"
- string normalpicname = "open.bmp"
- integer picsize = 16
- toolbaralignment pic_align = alignattop!
- boolean border = false
- end type
- type cb_8 from uo_imflatbutton within w_rp3
- integer x = 1586
- integer y = 4
- integer width = 151
- integer height = 164
- integer taborder = 200
- boolean bringtotop = true
- string text = "删除"
- string normalpicname = "delete.bmp"
- integer picsize = 16
- toolbaralignment pic_align = alignattop!
- boolean border = false
- end type
- type dw_1 from u_dw_rbtnfilter within w_rp3
- integer x = 18
- integer y = 308
- integer height = 1228
- integer taborder = 20
- boolean bringtotop = true
- end type
|