MainUnit.dfm 3.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179
  1. object MainForm: TMainForm
  2. Left = 324
  3. Top = 77
  4. Width = 730
  5. Height = 625
  6. Caption = 'Polygon Renderer Benchmark'
  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 = True
  14. Position = poDesktopCenter
  15. OnCreate = FormCreate
  16. PixelsPerInch = 96
  17. TextHeight = 13
  18. object PnlTop: TPanel
  19. Left = 0
  20. Top = 0
  21. Width = 722
  22. Height = 364
  23. Align = alClient
  24. BevelOuter = bvNone
  25. BorderWidth = 10
  26. TabOrder = 0
  27. object Img: TImage32
  28. Left = 10
  29. Top = 10
  30. Width = 702
  31. Height = 344
  32. Align = alClient
  33. Bitmap.ResamplerClassName = 'TNearestResampler'
  34. BitmapAlign = baTopLeft
  35. Scale = 1.000000000000000000
  36. ScaleMode = smNormal
  37. TabOrder = 0
  38. OnResize = ImgResize
  39. end
  40. end
  41. object PnlBottom: TPanel
  42. Left = 0
  43. Top = 364
  44. Width = 722
  45. Height = 234
  46. Align = alBottom
  47. BevelOuter = bvNone
  48. BorderWidth = 10
  49. TabOrder = 1
  50. object GbxSettings: TGroupBox
  51. Left = 10
  52. Top = 10
  53. Width = 328
  54. Height = 214
  55. Align = alLeft
  56. Caption = 'Benchmark Settings'
  57. TabOrder = 0
  58. object LblTest: TLabel
  59. Left = 14
  60. Top = 34
  61. Width = 25
  62. Height = 13
  63. Caption = '&Test:'
  64. Color = clBtnFace
  65. FocusControl = CmbTest
  66. ParentColor = False
  67. Transparent = False
  68. end
  69. object LblRenderer: TLabel
  70. Left = 14
  71. Top = 61
  72. Width = 49
  73. Height = 13
  74. Caption = '&Renderer:'
  75. Color = clBtnFace
  76. FocusControl = CmbRenderer
  77. ParentColor = False
  78. Transparent = False
  79. end
  80. object BtnBenchmark: TButton
  81. Left = 14
  82. Top = 158
  83. Width = 139
  84. Height = 25
  85. Caption = 'Do &Benchmark'
  86. TabOrder = 4
  87. OnClick = BtnBenchmarkClick
  88. end
  89. object CmbTest: TComboBox
  90. Left = 78
  91. Top = 31
  92. Width = 225
  93. Height = 21
  94. Style = csDropDownList
  95. ItemHeight = 13
  96. TabOrder = 0
  97. end
  98. object CmbRenderer: TComboBox
  99. Left = 78
  100. Top = 58
  101. Width = 225
  102. Height = 21
  103. Style = csDropDownList
  104. ItemHeight = 13
  105. TabOrder = 1
  106. end
  107. object CbxAllTests: TCheckBox
  108. Left = 14
  109. Top = 98
  110. Width = 112
  111. Height = 19
  112. Caption = 'Bench&mark all tests'
  113. TabOrder = 2
  114. end
  115. object CbxAllRenderers: TCheckBox
  116. Left = 14
  117. Top = 122
  118. Width = 135
  119. Height = 19
  120. Caption = 'Benchmar&k all renderers'
  121. TabOrder = 3
  122. end
  123. object BtnExit: TButton
  124. Left = 158
  125. Top = 158
  126. Width = 139
  127. Height = 25
  128. Cancel = True
  129. Caption = 'E&xit'
  130. TabOrder = 5
  131. OnClick = BtnExitClick
  132. end
  133. end
  134. object GbxResults: TGroupBox
  135. Left = 348
  136. Top = 10
  137. Width = 364
  138. Height = 214
  139. Align = alClient
  140. Caption = 'Benchmark Res&ults'
  141. TabOrder = 1
  142. object PnlBenchmark: TPanel
  143. Left = 2
  144. Top = 15
  145. Width = 360
  146. Height = 197
  147. Align = alClient
  148. BevelOuter = bvNone
  149. BorderWidth = 10
  150. TabOrder = 0
  151. object MemoLog: TMemo
  152. Left = 10
  153. Top = 10
  154. Width = 340
  155. Height = 177
  156. Align = alClient
  157. Font.Charset = ANSI_CHARSET
  158. Font.Color = clWindowText
  159. Font.Height = -11
  160. Font.Name = 'Courier New'
  161. Font.Pitch = fpFixed
  162. Font.Style = []
  163. ParentFont = False
  164. ScrollBars = ssVertical
  165. TabOrder = 0
  166. end
  167. end
  168. end
  169. object PnlSpacer: TPanel
  170. Left = 338
  171. Top = 10
  172. Width = 10
  173. Height = 214
  174. Align = alLeft
  175. BevelOuter = bvNone
  176. TabOrder = 2
  177. end
  178. end
  179. end