w_zkl_begin.srw 1.4 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374
  1. $PBExportHeader$w_zkl_begin.srw
  2. $PBExportComments$启动等待和版本信息--窗口
  3. forward
  4. global type w_zkl_begin from window
  5. end type
  6. type st_33 from statictext within w_zkl_begin
  7. end type
  8. type p_4 from picture within w_zkl_begin
  9. end type
  10. end forward
  11. global type w_zkl_begin from window
  12. string tag = "启动等待窗口"
  13. integer x = 366
  14. integer y = 168
  15. integer width = 2176
  16. integer height = 1572
  17. boolean resizable = true
  18. windowtype windowtype = popup!
  19. st_33 st_33
  20. p_4 p_4
  21. end type
  22. global w_zkl_begin w_zkl_begin
  23. on w_zkl_begin.create
  24. this.st_33=create st_33
  25. this.p_4=create p_4
  26. this.Control[]={this.st_33,&
  27. this.p_4}
  28. end on
  29. on w_zkl_begin.destroy
  30. destroy(this.st_33)
  31. destroy(this.p_4)
  32. end on
  33. event clicked;close(w_zkl_begin)
  34. end event
  35. event open;f_wcenter(this)
  36. end event
  37. type st_33 from statictext within w_zkl_begin
  38. event clicked pbm_bnclicked
  39. boolean visible = false
  40. integer x = 517
  41. integer y = 992
  42. integer width = 1093
  43. integer height = 76
  44. boolean bringtotop = true
  45. integer textsize = -9
  46. integer weight = 700
  47. fontcharset fontcharset = ansi!
  48. fontpitch fontpitch = variable!
  49. fontfamily fontfamily = swiss!
  50. string facename = "Arial"
  51. long textcolor = 8421376
  52. long backcolor = 16777215
  53. boolean enabled = false
  54. string text = "指定销售:陶清网站 http://928.126.com"
  55. long bordercolor = 16777215
  56. boolean focusrectangle = false
  57. end type
  58. event clicked;//*************//
  59. close(w_zkl_begin)
  60. end event
  61. type p_4 from picture within w_zkl_begin
  62. end type