w_email_letterpaper_edit.srw 25 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710
  1. $PBExportHeader$w_email_letterpaper_edit.srw
  2. forward
  3. global type w_email_letterpaper_edit from window
  4. end type
  5. type cb_6 from commandbutton within w_email_letterpaper_edit
  6. end type
  7. type cb_5 from commandbutton within w_email_letterpaper_edit
  8. end type
  9. type ole_1 from olecustomcontrol within w_email_letterpaper_edit
  10. end type
  11. type ddlb_1 from dropdownlistbox within w_email_letterpaper_edit
  12. end type
  13. type st_2 from statictext within w_email_letterpaper_edit
  14. end type
  15. type cb_4 from commandbutton within w_email_letterpaper_edit
  16. end type
  17. type cb_3 from commandbutton within w_email_letterpaper_edit
  18. end type
  19. type cb_2 from commandbutton within w_email_letterpaper_edit
  20. end type
  21. type cb_1 from commandbutton within w_email_letterpaper_edit
  22. end type
  23. type sle_1 from singlelineedit within w_email_letterpaper_edit
  24. end type
  25. type st_1 from statictext within w_email_letterpaper_edit
  26. end type
  27. type gb_1 from groupbox within w_email_letterpaper_edit
  28. end type
  29. end forward
  30. global type w_email_letterpaper_edit from window
  31. integer width = 3232
  32. integer height = 1980
  33. boolean titlebar = true
  34. string title = "编辑信纸"
  35. boolean minbox = true
  36. boolean maxbox = true
  37. boolean resizable = true
  38. long backcolor = 67108864
  39. string icon = "AppIcon!"
  40. boolean center = true
  41. cb_6 cb_6
  42. cb_5 cb_5
  43. ole_1 ole_1
  44. ddlb_1 ddlb_1
  45. st_2 st_2
  46. cb_4 cb_4
  47. cb_3 cb_3
  48. cb_2 cb_2
  49. cb_1 cb_1
  50. sle_1 sle_1
  51. st_1 st_1
  52. gb_1 gb_1
  53. end type
  54. global w_email_letterpaper_edit w_email_letterpaper_edit
  55. type variables
  56. transaction fj_tran
  57. long paperid
  58. string ownerid
  59. boolean ifchanged=false
  60. string backPath=''
  61. string logoPath=''
  62. string bottomPath=''
  63. uo_html_editor uo_ht
  64. end variables
  65. forward prototypes
  66. public function integer wf_save ()
  67. public function integer wf_retrieve (integer arg_paperid)
  68. public function integer wf_refresh ()
  69. end prototypes
  70. public function integer wf_save ();String papername,ls_msg
  71. DateTime opdate,empty
  72. Long rslt = 1,pictype
  73. Blob pic
  74. SetNull(pic)
  75. SetNull(empty)
  76. opdate = DateTime(Today(),Now())
  77. papername = sle_1.Text
  78. IF ddlb_1.Text = '私有' THEN
  79. pictype = 2
  80. ELSEIF ddlb_1.Text = '公有' THEN
  81. pictype = 1
  82. END IF
  83. IF paperid = 0 THEN
  84. SELECT count(*)
  85. INTO :paperid
  86. FROM u_email_letterpaper
  87. Using fj_tran;
  88. IF paperid = 0 THEN
  89. paperid = 1
  90. GOTO ne1
  91. END IF
  92. SELECT max(paperid)+1
  93. INTO :paperid
  94. FROM u_email_letterpaper
  95. Using fj_tran;
  96. IF fj_tran.SQLCode <> 0 THEN
  97. rslt = 0
  98. // messagebox('','获取邮件ID失败')
  99. GOTO ext
  100. END IF
  101. ne1:
  102. INSERT INTO u_email_letterpaper(paperid,ownerid,type,picdata,piclen,opdate,moddate,papername,style)
  103. VALUES(:paperid,:ownerid,:pictype,:pic,0,:opdate,:empty,:papername,'自定义')
  104. Using fj_tran;
  105. IF fj_tran.SQLCode <> 0 THEN
  106. rslt = 0
  107. GOTO ext
  108. ROLLBACK Using fj_tran;
  109. ELSE
  110. COMMIT Using fj_tran;
  111. END IF
  112. ELSE
  113. UPDATE u_email_letterpaper
  114. SET paperid = :paperid,
  115. ownerid = :ownerid,
  116. type = :pictype,
  117. moddate = :opdate,
  118. papername = :papername,
  119. style='自定义'
  120. WHERE paperid = :paperid
  121. Using fj_tran;
  122. IF fj_tran.SQLCode <> 0 THEN
  123. rslt = 0
  124. GOTO ext
  125. ROLLBACK Using fj_tran;
  126. ELSE
  127. COMMIT Using fj_tran;
  128. END IF
  129. END IF
  130. //保存图片
  131. IF ifchanged THEN
  132. // String ls_path, ls_filename //完整的路径+文件名,文件名
  133. // Int li_getname, li_loops, li_i
  134. // Int li_fileptr //文件的句柄
  135. Long ll_filelen,ll_bytes_read
  136. Blob lbb_Read,lbb_Total,lbb_empty
  137. string lenDetail=''
  138. //
  139. // //获取文件名
  140. // ls_filename = backPath
  141. // ls_path = backPath
  142. //
  143. //
  144. // SetPointer(HourGlass!) //设置鼠标
  145. // ll_filelen = FileLength(ls_filename) //在打开之前获取文件长度
  146. // IF ll_filelen > 32765 THEN //一次只能读32K
  147. // IF Mod(ll_filelen, 32765) = 0 THEN
  148. // li_loops = ll_filelen / 32765
  149. // ELSE
  150. // li_loops = (ll_filelen / 32765) + 1
  151. // END IF
  152. // ELSE
  153. // li_loops = 1
  154. // END IF
  155. //
  156. // //打开图像文件
  157. // li_fileptr = FileOpen(ls_path,STREAMMODE!,Read!,LOCKREAD!)
  158. // IF li_fileptr = -1 THEN
  159. //
  160. // MessageBox("错误","图片打开错误!")
  161. // RETURN 0
  162. // END IF
  163. //
  164. // //循环读取图片文件
  165. // FOR li_i = 1 To li_loops
  166. // ll_bytes_read = FileRead(li_fileptr,lbb_Read)
  167. // lbb_Total = lbb_Total + lbb_Read
  168. // NEXT
  169. //
  170. // FileClose(li_fileptr) //关闭文件
  171. //背景
  172. lbb_read=lbb_empty
  173. ll_filelen = FileLength(backPath) //在打开之前获取文件长度
  174. lendetail +=string(ll_filelen)+','
  175. f_filetoblob(backPath,ref lbb_read,ls_msg)
  176. lbb_Total=lbb_read
  177. //LOGO
  178. lbb_read=lbb_empty
  179. ll_filelen = FileLength(logoPath) //在打开之前获取文件长度
  180. lendetail +=string(ll_filelen)+','
  181. f_filetoblob(logoPath,ref lbb_read,ls_msg)
  182. lbb_Total +=lbb_read
  183. //底部
  184. lbb_read=lbb_empty
  185. ll_filelen = FileLength(bottomPath) //在打开之前获取文件长度
  186. lendetail +=string(ll_filelen)
  187. f_filetoblob(bottomPath,ref lbb_read,ls_msg)
  188. lbb_Total +=lbb_read
  189. fj_tran.AutoCommit = True
  190. UpdateBlob u_email_letterpaper
  191. Set picdata = :lbb_Total
  192. Where paperid = :paperid
  193. Using fj_tran;
  194. IF fj_tran.SQLNRows > 0 THEN
  195. MessageBox('提示','图片保存到数据库中成功!')
  196. END IF
  197. ll_filelen=len(lbb_total)
  198. UPDATE u_email_letterpaper
  199. SET piclen = :ll_filelen,
  200. lendetail=:lendetail
  201. WHERE paperid = :paperid
  202. Using fj_tran;
  203. fj_tran.AutoCommit = False
  204. END IF
  205. ext:
  206. RETURN rslt
  207. end function
  208. public function integer wf_retrieve (integer arg_paperid);Long rslt = 1,ll_ConnectionID
  209. String pName,arg_msg,lendetail
  210. Long pictype
  211. SELECT papername,type,lendetail
  212. INTO :pName,:pictype,:lendetail
  213. FROM u_email_letterpaper
  214. WHERE paperid = :arg_paperid
  215. Using fj_tran;
  216. IF fj_tran.SQLCode <> 0 THEN
  217. rslt = 0
  218. END IF
  219. sle_1.Text = pName
  220. IF pictype = 1 THEN
  221. ddlb_1.SelectItem(1)
  222. ELSEIF pictype = 2 THEN
  223. ddlb_1.SelectItem(2)
  224. END IF
  225. //填充图片
  226. Blob lb_pic,lbb_read
  227. Long place
  228. //messagebox("",integer(sle_1.text))
  229. Int li_id
  230. //li_id=integer(sle_1.text)
  231. SelectBlob picdata
  232. Into :lb_pic
  233. From u_email_letterpaper
  234. Where paperid = :paperid
  235. Using fj_tran;
  236. IF fj_tran.SQLCode <> - 1 THEN
  237. IF Len(lb_pic) > 0 THEN
  238. // p_1.SetPicture(lb_pic)
  239. //ole_1.object.document.body.background=''
  240. String Len[],Name[]
  241. Long cnt,len1,st = 1
  242. String path,ls_msg
  243. uo_strhelper strhelper
  244. strhelper = create uo_strhelper
  245. strhelper.split(lendetail,',',Ref Len)
  246. destroy strhelper
  247. FOR cnt = 1 To UpperBound(Len)
  248. len1 = Long(Len[cnt])
  249. path = 'c:\'+String(paperid,'pic0000')+String(cnt,'00.jpg')
  250. IF FileExists(path) THEN
  251. FileDelete(path)
  252. END IF
  253. IF len1 = -1 THEN
  254. Name[cnt] = ''
  255. CONTINUE
  256. end if
  257. lbb_read = BlobMid(lb_pic,st,len1)
  258. Name[cnt] = path
  259. f_blobtofile(path,lbb_read,ls_msg)
  260. st += len1
  261. NEXT
  262. backPath = Name[1]
  263. logoPath = Name[2]
  264. bottomPath = Name[3]
  265. Timer(0.1)
  266. END IF
  267. ELSE
  268. // p_1.PictureName = ""
  269. //ole_1.object.document.body.background=''
  270. END IF
  271. RETURN rslt
  272. end function
  273. public function integer wf_refresh ();long rslt=1
  274. string bodytxt,tag1
  275. bodytxt=uo_ht.uf_style_zidingyi()
  276. long cnt,place
  277. tag1='logopicpath'
  278. place=pos(lower(bodytxt),tag1)
  279. bodytxt=replace(bodytxt,place,len(tag1),logoPath)
  280. tag1='bottompicpath'
  281. place=pos(lower(bodytxt),tag1)
  282. bodytxt=replace(bodytxt,place,len(tag1),bottomPath)
  283. tag1='backpicpath'
  284. place=pos(lower(bodytxt),tag1)
  285. bodytxt=replace(bodytxt,place,len(tag1),backPath)
  286. place=pos(lower(bodytxt),'contentEditable=true')
  287. do while place>0
  288. replace(lower(bodytxt),place,len('contentEditable=true'),'contentEditable=false')
  289. place=pos(lower(bodytxt),'contentEditable=true')
  290. loop
  291. place=pos(lower(bodytxt),'<img src="file:///">')
  292. long next1
  293. do while place>0
  294. // next1=pos(bodytxt,'>',place)
  295. bodytxt=replace(lower(bodytxt),place,len('<img src="file:///">'),'')
  296. place=pos(lower(bodytxt),'<img src="file:///">')
  297. loop
  298. ole_1.object.document.body.innerhtml = bodytxt
  299. ole_1.object.document.body.contentEditable='false'
  300. return rslt
  301. end function
  302. on w_email_letterpaper_edit.create
  303. this.cb_6=create cb_6
  304. this.cb_5=create cb_5
  305. this.ole_1=create ole_1
  306. this.ddlb_1=create ddlb_1
  307. this.st_2=create st_2
  308. this.cb_4=create cb_4
  309. this.cb_3=create cb_3
  310. this.cb_2=create cb_2
  311. this.cb_1=create cb_1
  312. this.sle_1=create sle_1
  313. this.st_1=create st_1
  314. this.gb_1=create gb_1
  315. this.Control[]={this.cb_6,&
  316. this.cb_5,&
  317. this.ole_1,&
  318. this.ddlb_1,&
  319. this.st_2,&
  320. this.cb_4,&
  321. this.cb_3,&
  322. this.cb_2,&
  323. this.cb_1,&
  324. this.sle_1,&
  325. this.st_1,&
  326. this.gb_1}
  327. end on
  328. on w_email_letterpaper_edit.destroy
  329. destroy(this.cb_6)
  330. destroy(this.cb_5)
  331. destroy(this.ole_1)
  332. destroy(this.ddlb_1)
  333. destroy(this.st_2)
  334. destroy(this.cb_4)
  335. destroy(this.cb_3)
  336. destroy(this.cb_2)
  337. destroy(this.cb_1)
  338. destroy(this.sle_1)
  339. destroy(this.st_1)
  340. destroy(this.gb_1)
  341. end on
  342. event open;s_email_letterpaper s_paper
  343. long ll_ConnectionID
  344. string arg_msg
  345. s_paper=message.PowerObjectParm
  346. uo_ht=create uo_html_editor
  347. ddlb_1.selectitem(1)
  348. paperid=s_paper.paperid
  349. ownerid=s_paper.ownerid
  350. IF sys_email_sqlca.DBHandle() > 0 THEN
  351. fj_tran = sys_email_sqlca
  352. ELSE
  353. MessageBox('系统提示','要使用邮件功能,请先定义邮件数据库')
  354. END IF
  355. //if s_paper.paperid=0 then goto ext
  356. ole_1.object.Navigate('about:blank')
  357. ole_1.object.document.ExecCommand("EditMode", false, 0)
  358. ole_1.object.document.ExecCommand("LiveResize", false, 0)
  359. wf_retrieve(paperid)
  360. //ext:
  361. end event
  362. event timer;wf_refresh()
  363. timer(0)
  364. end event
  365. type cb_6 from commandbutton within w_email_letterpaper_edit
  366. integer x = 96
  367. integer y = 1608
  368. integer width = 402
  369. integer height = 84
  370. integer taborder = 50
  371. integer textsize = -9
  372. integer weight = 400
  373. fontcharset fontcharset = gb2312charset!
  374. fontpitch fontpitch = variable!
  375. string facename = "宋体"
  376. string text = "设置底部"
  377. end type
  378. event clicked;string path
  379. string docpath, docname[]
  380. integer i, li_cnt, li_rtn, li_filenum
  381. li_rtn = GetFileOpenName("选择信纸图片", &
  382. docpath, docname[], "jpg", &
  383. + "JPEG Files (*.jpg),*.jpg," &
  384. + "BMP Files (*.bmp),*.bmp," &
  385. + "All Files (*.*), *.*", &
  386. + "C:\Program Files\", 18)
  387. IF li_rtn < 1 THEN return
  388. bottomPath = docpath
  389. wf_refresh()
  390. //ole_1.object.document.body.background=docpath
  391. ifchanged=true
  392. end event
  393. type cb_5 from commandbutton within w_email_letterpaper_edit
  394. integer x = 530
  395. integer y = 1612
  396. integer width = 343
  397. integer height = 84
  398. integer taborder = 50
  399. integer textsize = -9
  400. integer weight = 400
  401. fontcharset fontcharset = gb2312charset!
  402. fontpitch fontpitch = variable!
  403. string facename = "宋体"
  404. string text = "设置LOGO"
  405. end type
  406. event clicked;string path
  407. string docpath, docname[]
  408. integer i, li_cnt, li_rtn, li_filenum
  409. li_rtn = GetFileOpenName("选择信纸图片", &
  410. docpath, docname[], "jpg", &
  411. + "JPEG Files (*.jpg),*.jpg," &
  412. + "BMP Files (*.bmp),*.bmp," &
  413. + "All Files (*.*), *.*", &
  414. + "C:\Program Files\", 18)
  415. IF li_rtn < 1 THEN return
  416. logoPath = docpath
  417. wf_refresh()
  418. //ole_1.object.document.body.background=docpath
  419. ifchanged=true
  420. end event
  421. type ole_1 from olecustomcontrol within w_email_letterpaper_edit
  422. event statustextchange ( string text )
  423. event progresschange ( long progress, long progressmax )
  424. event commandstatechange ( long command, boolean enable )
  425. event downloadbegin ( )
  426. event downloadcomplete ( )
  427. event titlechange ( string text )
  428. event propertychange ( string szproperty )
  429. event beforenavigate2 ( oleobject pdisp, any url, any flags, any targetframename, any postdata, any headers, ref boolean cancel )
  430. event newwindow2 ( ref oleobject ppdisp, ref boolean cancel )
  431. event navigatecomplete2 ( oleobject pdisp, any url )
  432. event documentcomplete ( oleobject pdisp, any url )
  433. event onquit ( )
  434. event onvisible ( boolean ocx_visible )
  435. event ontoolbar ( boolean toolbar )
  436. event onmenubar ( boolean menubar )
  437. event onstatusbar ( boolean statusbar )
  438. event onfullscreen ( boolean fullscreen )
  439. event ontheatermode ( boolean theatermode )
  440. event windowsetresizable ( boolean resizable )
  441. event windowsetleft ( long left )
  442. event windowsettop ( long top )
  443. event windowsetwidth ( long ocx_width )
  444. event windowsetheight ( long ocx_height )
  445. event windowclosing ( boolean ischildwindow, ref boolean cancel )
  446. event clienttohostwindow ( ref long cx, ref long cy )
  447. event setsecurelockicon ( long securelockicon )
  448. event filedownload ( boolean activedocument, ref boolean cancel )
  449. event navigateerror ( oleobject pdisp, any url, any frame, any statuscode, ref boolean cancel )
  450. event printtemplateinstantiation ( oleobject pdisp )
  451. event printtemplateteardown ( oleobject pdisp )
  452. event updatepagestatus ( oleobject pdisp, any npage, any fdone )
  453. event privacyimpactedstatechange ( boolean bimpacted )
  454. event setphishingfilterstatus ( long phishingfilterstatus )
  455. event newprocess ( long lcauseflag, oleobject pwb2, ref boolean cancel )
  456. event redirectxdomainblocked ( oleobject pdisp, any starturl, any redirecturl, any frame, any statuscode )
  457. integer x = 96
  458. integer y = 188
  459. integer width = 2981
  460. integer height = 1388
  461. integer taborder = 40
  462. boolean focusrectangle = false
  463. string binarykey = "w_email_letterpaper_edit.win"
  464. integer textsize = -9
  465. integer weight = 400
  466. fontcharset fontcharset = gb2312charset!
  467. fontpitch fontpitch = variable!
  468. string facename = "宋体"
  469. long textcolor = 33554432
  470. end type
  471. event constructor;//ole_1.object.Navigate('about:blank')
  472. ////ole_1.object.document.ExecCommand("EditMode", false, 0)
  473. //ole_1.object.document.ExecCommand("LiveResize", false, 0)
  474. //wf_retrieve(paperid)
  475. end event
  476. type ddlb_1 from dropdownlistbox within w_email_letterpaper_edit
  477. integer x = 1399
  478. integer y = 80
  479. integer width = 754
  480. integer height = 300
  481. integer taborder = 30
  482. integer textsize = -9
  483. integer weight = 400
  484. fontcharset fontcharset = gb2312charset!
  485. fontpitch fontpitch = variable!
  486. string facename = "宋体"
  487. long textcolor = 33554432
  488. boolean border = false
  489. string item[] = {"公有","私有"}
  490. end type
  491. type st_2 from statictext within w_email_letterpaper_edit
  492. integer x = 1239
  493. integer y = 80
  494. integer width = 270
  495. integer height = 72
  496. integer textsize = -9
  497. integer weight = 400
  498. fontcharset fontcharset = gb2312charset!
  499. fontpitch fontpitch = variable!
  500. string facename = "宋体"
  501. long textcolor = 33554432
  502. long backcolor = 67108864
  503. string text = "类型:"
  504. boolean focusrectangle = false
  505. end type
  506. type cb_4 from commandbutton within w_email_letterpaper_edit
  507. integer x = 2098
  508. integer y = 1736
  509. integer width = 315
  510. integer height = 84
  511. integer taborder = 40
  512. integer textsize = -9
  513. integer weight = 400
  514. fontcharset fontcharset = gb2312charset!
  515. fontpitch fontpitch = variable!
  516. string facename = "宋体"
  517. string text = "应用"
  518. boolean default = true
  519. end type
  520. event clicked;wf_save()
  521. ifchanged=false
  522. end event
  523. type cb_3 from commandbutton within w_email_letterpaper_edit
  524. integer x = 2816
  525. integer y = 1736
  526. integer width = 315
  527. integer height = 84
  528. integer taborder = 40
  529. integer textsize = -9
  530. integer weight = 400
  531. fontcharset fontcharset = gb2312charset!
  532. fontpitch fontpitch = variable!
  533. string facename = "宋体"
  534. string text = "退出"
  535. end type
  536. event clicked;close(parent)
  537. end event
  538. type cb_2 from commandbutton within w_email_letterpaper_edit
  539. integer x = 2464
  540. integer y = 1736
  541. integer width = 297
  542. integer height = 84
  543. integer taborder = 30
  544. integer textsize = -9
  545. integer weight = 400
  546. fontcharset fontcharset = gb2312charset!
  547. fontpitch fontpitch = variable!
  548. string facename = "宋体"
  549. string text = "保存"
  550. end type
  551. event clicked;cb_4.triggerevent(clicked!)
  552. cb_3.triggerevent(clicked!)
  553. end event
  554. type cb_1 from commandbutton within w_email_letterpaper_edit
  555. integer x = 896
  556. integer y = 1612
  557. integer width = 357
  558. integer height = 84
  559. integer taborder = 20
  560. integer textsize = -9
  561. integer weight = 400
  562. fontcharset fontcharset = gb2312charset!
  563. fontpitch fontpitch = variable!
  564. string facename = "宋体"
  565. string text = "设置背景"
  566. end type
  567. event clicked;String path
  568. String docpath, docname[]
  569. Integer i, li_cnt, li_rtn, li_filenum
  570. li_rtn = GetFileOpenName("选择信纸图片", &
  571. docpath, docname[], "jpg", &
  572. + "JPEG Files (*.jpg),*.jpg," &
  573. + "BMP Files (*.bmp),*.bmp," &
  574. + "All Files (*.*), *.*", &
  575. + "C:\Program Files\", 18)
  576. IF li_rtn < 1 THEN RETURN
  577. //ole_1.Object.document.body.background = docpath
  578. backPath = docpath
  579. wf_refresh()
  580. ifchanged = True
  581. end event
  582. type sle_1 from singlelineedit within w_email_letterpaper_edit
  583. integer x = 384
  584. integer y = 72
  585. integer width = 768
  586. integer height = 84
  587. integer taborder = 20
  588. integer textsize = -9
  589. integer weight = 400
  590. fontcharset fontcharset = gb2312charset!
  591. fontpitch fontpitch = variable!
  592. string facename = "宋体"
  593. end type
  594. type st_1 from statictext within w_email_letterpaper_edit
  595. integer x = 101
  596. integer y = 84
  597. integer width = 293
  598. integer height = 72
  599. integer textsize = -9
  600. integer weight = 400
  601. fontcharset fontcharset = gb2312charset!
  602. fontpitch fontpitch = variable!
  603. string facename = "宋体"
  604. long textcolor = 33554432
  605. long backcolor = 67108864
  606. string text = "信纸主题:"
  607. boolean focusrectangle = false
  608. end type
  609. type gb_1 from groupbox within w_email_letterpaper_edit
  610. integer x = 55
  611. integer y = 24
  612. integer width = 3058
  613. integer height = 1692
  614. integer taborder = 40
  615. integer textsize = -9
  616. integer weight = 400
  617. fontcharset fontcharset = gb2312charset!
  618. fontpitch fontpitch = variable!
  619. string facename = "宋体"
  620. long textcolor = 33554432
  621. long backcolor = 67108864
  622. end type
  623. Start of PowerBuilder Binary Data Section : Do NOT Edit
  624. 01w_email_letterpaper_edit.bin
  625. 2900000a00e011cfd0e11ab1a1000000000000000000000000000000000003003e0009fffe000000060000000000000000000000010000000100000000000010000000000200000001fffffffe0000000000000000fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffdfffffffefffffffefffffffeffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff006f00520074006f004500200074006e00790072000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000050016ffffffffffffffff00000001000000000000000000000000000000000000000000000000000000000878329001ce1f9b00000003000001800000000000500003004f0042005800430054005300450052004d0041000000000000000000000000000000000000000000000000000000000000000000000000000000000102001affffffff00000002ffffffff000000000000000000000000000000000000000000000000000000000000000000000000000000000000009c00000000004200500043004f00530058004f00540041005200450047000000000000000000000000000000000000000000000000000000000000000000000000000000000001001affffffffffffffff000000038856f96111d0340ac0006ba9a205d74f000000000878329001ce1f9b0878329001ce1f9b000000000000000000000000004f00430054004e004e00450053005400000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000001020012ffffffffffffffffffffffff000000000000000000000000000000000000000000000000000000000000000000000000000000030000009c000000000000000100000002fffffffe0000000400000005fffffffeffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
  626. 28ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff0000004c00004363000023dd0000000000000000000000000000000000000000000000000000004c0000000000000000000000010057d0e011cf3573000869ae62122e2b00000008000000000000004c0002140100000000000000c0460000000000008000000000000000000000000000000000000000000000000000000000000000000000000000000001000000000000000000000000000000000000000100000001000000040000000100000001000000040000000000000000000000050000004c00004363000023dd0000000000000000000000000000000000000000000000000000004c0000000000000000000000010057d0e011cf3573000869ae62122e2b00000008000000000000004c0002140100000000000000c04600000000000080000000000000000000000000000000000000000000000000000000000000000000000000000000010000000000000000000000000000000000000001ffffffff0000000700000000ffffffff0000000700000000ffffffff0000000700000000ffffffff0000000700000000ffffffff0000000400000001ffffffff0000000400000001ffffffff0000000500000000ffffffff0000000500000000000000000000000700000001ffffffff0000000700000001ffffffff0000000800000001ffffffff0000000800000001ffffffff0000000800000001ffffffff000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
  627. 11w_email_letterpaper_edit.bin
  628. End of PowerBuilder Binary Data Section : No Source Expected After This Point