fMeshGradients.dfm 4.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190
  1. object FrmMeshGradients: TFrmMeshGradients
  2. Left = 0
  3. Top = 0
  4. Caption = 'Mesh Gradient Demo'
  5. ClientHeight = 481
  6. ClientWidth = 688
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -11
  11. Font.Name = 'Tahoma'
  12. Font.Style = []
  13. OldCreateOrder = False
  14. OnCreate = FormCreate
  15. DesignSize = (
  16. 688
  17. 481)
  18. PixelsPerInch = 96
  19. TextHeight = 13
  20. object PnlSettings: TPanel
  21. Left = 511
  22. Top = 0
  23. Width = 177
  24. Height = 481
  25. Align = alRight
  26. TabOrder = 0
  27. DesignSize = (
  28. 177
  29. 481)
  30. object LblBackgroundSampler: TLabel
  31. Left = 8
  32. Top = 23
  33. Width = 101
  34. Height = 13
  35. Caption = 'Background Sampler:'
  36. end
  37. object LblVertexColor: TLabel
  38. Left = 8
  39. Top = 236
  40. Width = 29
  41. Height = 13
  42. Caption = 'Color:'
  43. Visible = False
  44. end
  45. object VertexColorShape: TShape
  46. Left = 43
  47. Top = 234
  48. Width = 16
  49. Height = 16
  50. Visible = False
  51. OnMouseDown = VertexColorShapeMouseDown
  52. end
  53. object LblPower: TLabel
  54. Left = 8
  55. Top = 68
  56. Width = 34
  57. Height = 13
  58. Caption = 'Power:'
  59. end
  60. object PnlSampler: TPanel
  61. Left = 1
  62. Top = 1
  63. Width = 175
  64. Height = 16
  65. Align = alTop
  66. BevelOuter = bvNone
  67. Caption = 'Sampler'
  68. Color = clBtnShadow
  69. Font.Charset = DEFAULT_CHARSET
  70. Font.Color = clWindow
  71. Font.Height = -11
  72. Font.Name = 'Tahoma'
  73. Font.Style = []
  74. ParentFont = False
  75. TabOrder = 0
  76. end
  77. object CmbBackgroundSampler: TComboBox
  78. Left = 8
  79. Top = 39
  80. Width = 161
  81. Height = 21
  82. Style = csDropDownList
  83. Anchors = [akLeft, akTop, akRight]
  84. ItemIndex = 0
  85. TabOrder = 1
  86. Text = 'None'
  87. OnChange = CmbBackgroundSamplerChange
  88. Items.Strings = (
  89. 'None'
  90. 'Voronoi'
  91. 'Voronoi (HQ)'
  92. 'Shepards'
  93. 'Custom IDW')
  94. end
  95. object PnlVertex: TPanel
  96. Left = 1
  97. Top = 206
  98. Width = 175
  99. Height = 16
  100. BevelOuter = bvNone
  101. Caption = 'Vertex'
  102. Color = clBtnShadow
  103. Font.Charset = DEFAULT_CHARSET
  104. Font.Color = clWindow
  105. Font.Height = -11
  106. Font.Name = 'Tahoma'
  107. Font.Style = []
  108. ParentFont = False
  109. TabOrder = 2
  110. end
  111. object GbrPower: TGaugeBar
  112. Left = 48
  113. Top = 66
  114. Width = 121
  115. Height = 17
  116. Anchors = [akLeft, akTop, akRight]
  117. Backgnd = bgPattern
  118. Max = 10000
  119. Min = 1
  120. ShowHandleGrip = True
  121. Style = rbsMac
  122. Position = 10000
  123. OnChange = GbrPowerChange
  124. end
  125. object BtnStore: TButton
  126. Left = 14
  127. Top = 417
  128. Width = 147
  129. Height = 25
  130. Caption = '&Store Vertices'
  131. TabOrder = 4
  132. OnClick = BtnStoreClick
  133. end
  134. object BtnRecall: TButton
  135. Left = 14
  136. Top = 448
  137. Width = 147
  138. Height = 25
  139. Caption = '&Recall Vertices'
  140. Enabled = False
  141. TabOrder = 5
  142. OnClick = BtnRecallClick
  143. end
  144. object PnlDelaunayTriangulation: TPanel
  145. Left = 1
  146. Top = 107
  147. Width = 175
  148. Height = 16
  149. BevelOuter = bvNone
  150. Caption = 'Delaunay Triangulation'
  151. Color = clBtnShadow
  152. Font.Charset = DEFAULT_CHARSET
  153. Font.Color = clWindow
  154. Font.Height = -11
  155. Font.Name = 'Tahoma'
  156. Font.Style = []
  157. ParentFont = False
  158. TabOrder = 6
  159. end
  160. object CbxColoredPolygons: TCheckBox
  161. Left = 16
  162. Top = 129
  163. Width = 129
  164. Height = 17
  165. Caption = 'Show Colored Polygon'
  166. Checked = True
  167. State = cbChecked
  168. TabOrder = 7
  169. OnClick = CbxColoredPolygonsClick
  170. end
  171. end
  172. object PaintBox32: TPaintBox32
  173. Left = 8
  174. Top = 8
  175. Width = 497
  176. Height = 465
  177. Anchors = [akLeft, akTop, akRight, akBottom]
  178. TabOrder = 1
  179. OnDblClick = SelectVertexColorClick
  180. OnMouseDown = PaintBox32MouseDown
  181. OnMouseMove = PaintBox32MouseMove
  182. OnMouseUp = PaintBox32MouseUp
  183. OnPaintBuffer = PaintBox32PaintBuffer
  184. end
  185. object ColorDialog: TColorDialog
  186. Options = [cdFullOpen, cdAnyColor]
  187. Left = 336
  188. Top = 240
  189. end
  190. end