DelphiZXingQRCodeTestAppMainForm.dfm 1.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899
  1. object Form1: TForm1
  2. Left = 0
  3. Top = 0
  4. Caption = 'Delphi port of ZXing QRCode'
  5. ClientHeight = 282
  6. ClientWidth = 534
  7. Color = clBtnFace
  8. Constraints.MinHeight = 309
  9. Constraints.MinWidth = 542
  10. Font.Charset = DEFAULT_CHARSET
  11. Font.Color = clWindowText
  12. Font.Height = -11
  13. Font.Name = 'Tahoma'
  14. Font.Style = []
  15. OldCreateOrder = False
  16. OnCreate = FormCreate
  17. OnDestroy = FormDestroy
  18. DesignSize = (
  19. 534
  20. 282)
  21. PixelsPerInch = 96
  22. TextHeight = 13
  23. object Label1: TLabel
  24. Left = 8
  25. Top = 13
  26. Width = 22
  27. Height = 13
  28. Caption = 'Text'
  29. end
  30. object Label2: TLabel
  31. Left = 8
  32. Top = 69
  33. Width = 43
  34. Height = 13
  35. Caption = 'Encoding'
  36. end
  37. object Label3: TLabel
  38. Left = 184
  39. Top = 69
  40. Width = 52
  41. Height = 13
  42. Caption = 'Quiet zone'
  43. end
  44. object Label4: TLabel
  45. Left = 296
  46. Top = 13
  47. Width = 38
  48. Height = 13
  49. Caption = 'Preview'
  50. end
  51. object PaintBox1: TPaintBox
  52. Left = 296
  53. Top = 32
  54. Width = 230
  55. Height = 242
  56. Anchors = [akLeft, akTop, akRight, akBottom]
  57. OnPaint = PaintBox1Paint
  58. ExplicitWidth = 331
  59. ExplicitHeight = 260
  60. end
  61. object edtText: TEdit
  62. Left = 8
  63. Top = 32
  64. Width = 265
  65. Height = 21
  66. TabOrder = 0
  67. Text = 'Hello world'
  68. OnChange = edtTextChange
  69. end
  70. object cmbEncoding: TComboBox
  71. Left = 8
  72. Top = 88
  73. Width = 145
  74. Height = 21
  75. Style = csDropDownList
  76. ItemHeight = 13
  77. ItemIndex = 0
  78. TabOrder = 1
  79. Text = 'Auto'
  80. OnChange = cmbEncodingChange
  81. Items.Strings = (
  82. 'Auto'
  83. 'Numeric'
  84. 'Alphanumeric'
  85. 'ISO-8859-1'
  86. 'UTF-8 without BOM'
  87. 'UTF-8 with BOM')
  88. end
  89. object edtQuietZone: TEdit
  90. Left = 184
  91. Top = 88
  92. Width = 89
  93. Height = 21
  94. TabOrder = 2
  95. Text = '4'
  96. OnChange = edtQuietZoneChange
  97. end
  98. end