w_model_fx.srw 6.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269
  1. $PBExportHeader$w_model_fx.srw
  2. $PBExportComments$分销系统--packet打开模型
  3. forward
  4. global type w_model_fx from w_publ_base_style
  5. end type
  6. type cb_accept from uo_imflatbutton within w_model_fx
  7. end type
  8. type cb_reject from uo_imflatbutton within w_model_fx
  9. end type
  10. type dw_main from datawindow within w_model_fx
  11. end type
  12. type st_1 from statictext within w_model_fx
  13. end type
  14. type mle_summary from multilineedit within w_model_fx
  15. end type
  16. type st_2 from statictext within w_model_fx
  17. end type
  18. type mle_postscript from multilineedit within w_model_fx
  19. end type
  20. type st_3 from statictext within w_model_fx
  21. end type
  22. type mle_remark from multilineedit within w_model_fx
  23. end type
  24. end forward
  25. global type w_model_fx from w_publ_base_style
  26. integer width = 3799
  27. integer height = 2396
  28. string title = ""
  29. boolean maxbox = true
  30. boolean resizable = true
  31. long backcolor = 16777215
  32. string icon = "graphics\chain_link_128px.ico"
  33. boolean center = true
  34. cb_accept cb_accept
  35. cb_reject cb_reject
  36. dw_main dw_main
  37. st_1 st_1
  38. mle_summary mle_summary
  39. st_2 st_2
  40. mle_postscript mle_postscript
  41. st_3 st_3
  42. mle_remark mle_remark
  43. end type
  44. global w_model_fx w_model_fx
  45. type variables
  46. s_open_packet s_tran
  47. end variables
  48. on w_model_fx.create
  49. int iCurrent
  50. call super::create
  51. this.cb_accept=create cb_accept
  52. this.cb_reject=create cb_reject
  53. this.dw_main=create dw_main
  54. this.st_1=create st_1
  55. this.mle_summary=create mle_summary
  56. this.st_2=create st_2
  57. this.mle_postscript=create mle_postscript
  58. this.st_3=create st_3
  59. this.mle_remark=create mle_remark
  60. iCurrent=UpperBound(this.Control)
  61. this.Control[iCurrent+1]=this.cb_accept
  62. this.Control[iCurrent+2]=this.cb_reject
  63. this.Control[iCurrent+3]=this.dw_main
  64. this.Control[iCurrent+4]=this.st_1
  65. this.Control[iCurrent+5]=this.mle_summary
  66. this.Control[iCurrent+6]=this.st_2
  67. this.Control[iCurrent+7]=this.mle_postscript
  68. this.Control[iCurrent+8]=this.st_3
  69. this.Control[iCurrent+9]=this.mle_remark
  70. end on
  71. on w_model_fx.destroy
  72. call super::destroy
  73. destroy(this.cb_accept)
  74. destroy(this.cb_reject)
  75. destroy(this.dw_main)
  76. destroy(this.st_1)
  77. destroy(this.mle_summary)
  78. destroy(this.st_2)
  79. destroy(this.mle_postscript)
  80. destroy(this.st_3)
  81. destroy(this.mle_remark)
  82. end on
  83. event open;call super::open;s_tran = Message.PowerObjectParm
  84. if IsNUll(s_tran) then
  85. MessageBox('提示', '打开方式有误,SN号为空')
  86. Close(this)
  87. return
  88. end if
  89. //dw_tempoutwaremx = tab_1.tabpage_1.dw_tempoutwaremx
  90. mle_summary.Text = s_tran.summary
  91. mle_postscript.Text = s_tran.postscript
  92. mle_remark.Text = s_tran.remark
  93. //retrieve
  94. end event
  95. event resize;call super::resize;if (this.Width < 3762) then this.Width = 3762
  96. if (this.Height < 2292) then this.Height = 2292
  97. mle_summary.Width = this.workspacewidth( ) - mle_summary.X - 14
  98. mle_postscript.Width = mle_summary.Width
  99. mle_remark.Width = mle_summary.Width
  100. end event
  101. type cb_func from w_publ_base_style`cb_func within w_model_fx
  102. boolean visible = false
  103. end type
  104. type cb_exit from w_publ_base_style`cb_exit within w_model_fx
  105. integer x = 549
  106. end type
  107. type ln_bar from w_publ_base_style`ln_bar within w_model_fx
  108. end type
  109. type ln_bar2 from w_publ_base_style`ln_bar2 within w_model_fx
  110. end type
  111. type r_bar from w_publ_base_style`r_bar within w_model_fx
  112. end type
  113. type cb_accept from uo_imflatbutton within w_model_fx
  114. integer width = 384
  115. integer height = 164
  116. integer taborder = 30
  117. boolean bringtotop = true
  118. string text = "确认本次报价"
  119. string normalpicname = "ok.bmp"
  120. integer picsize = 16
  121. toolbaralignment pic_align = alignattop!
  122. boolean border = false
  123. end type
  124. type cb_reject from uo_imflatbutton within w_model_fx
  125. integer x = 384
  126. integer width = 165
  127. integer height = 164
  128. integer taborder = 30
  129. boolean bringtotop = true
  130. string text = "拒绝"
  131. string normalpicname = "DELETE.BMP"
  132. integer picsize = 16
  133. toolbaralignment pic_align = alignattop!
  134. boolean border = false
  135. end type
  136. type dw_main from datawindow within w_model_fx
  137. integer y = 172
  138. integer width = 1801
  139. integer height = 1104
  140. integer taborder = 20
  141. boolean bringtotop = true
  142. string title = "none"
  143. boolean livescroll = true
  144. end type
  145. type st_1 from statictext within w_model_fx
  146. integer x = 1824
  147. integer y = 172
  148. integer width = 146
  149. integer height = 48
  150. boolean bringtotop = true
  151. integer textsize = -9
  152. integer weight = 400
  153. fontcharset fontcharset = gb2312charset!
  154. fontpitch fontpitch = variable!
  155. string facename = "宋体"
  156. long textcolor = 33554432
  157. long backcolor = 16777215
  158. string text = "摘要"
  159. boolean focusrectangle = false
  160. end type
  161. type mle_summary from multilineedit within w_model_fx
  162. integer x = 1824
  163. integer y = 232
  164. integer width = 1929
  165. integer height = 300
  166. integer taborder = 30
  167. boolean bringtotop = true
  168. integer textsize = -9
  169. integer weight = 400
  170. fontcharset fontcharset = gb2312charset!
  171. fontpitch fontpitch = variable!
  172. string facename = "宋体"
  173. long textcolor = 33554432
  174. boolean vscrollbar = true
  175. boolean autovscroll = true
  176. end type
  177. type st_2 from statictext within w_model_fx
  178. integer x = 1824
  179. integer y = 548
  180. integer width = 146
  181. integer height = 48
  182. boolean bringtotop = true
  183. integer textsize = -9
  184. integer weight = 400
  185. fontcharset fontcharset = gb2312charset!
  186. fontpitch fontpitch = variable!
  187. string facename = "宋体"
  188. long textcolor = 33554432
  189. long backcolor = 16777215
  190. string text = "附言"
  191. boolean focusrectangle = false
  192. end type
  193. type mle_postscript from multilineedit within w_model_fx
  194. integer x = 1824
  195. integer y = 604
  196. integer width = 1929
  197. integer height = 300
  198. integer taborder = 40
  199. boolean bringtotop = true
  200. integer textsize = -9
  201. integer weight = 400
  202. fontcharset fontcharset = gb2312charset!
  203. fontpitch fontpitch = variable!
  204. string facename = "宋体"
  205. long textcolor = 33554432
  206. boolean vscrollbar = true
  207. boolean autovscroll = true
  208. end type
  209. type st_3 from statictext within w_model_fx
  210. integer x = 1824
  211. integer y = 916
  212. integer width = 146
  213. integer height = 48
  214. boolean bringtotop = true
  215. integer textsize = -9
  216. integer weight = 400
  217. fontcharset fontcharset = gb2312charset!
  218. fontpitch fontpitch = variable!
  219. string facename = "宋体"
  220. long textcolor = 33554432
  221. long backcolor = 16777215
  222. string text = "备注"
  223. boolean focusrectangle = false
  224. end type
  225. type mle_remark from multilineedit within w_model_fx
  226. integer x = 1824
  227. integer y = 976
  228. integer width = 1929
  229. integer height = 300
  230. integer taborder = 40
  231. boolean bringtotop = true
  232. integer textsize = -9
  233. integer weight = 400
  234. fontcharset fontcharset = gb2312charset!
  235. fontpitch fontpitch = variable!
  236. string facename = "宋体"
  237. long textcolor = 33554432
  238. boolean vscrollbar = true
  239. boolean autovscroll = true
  240. end type