123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179 |
- object MainForm: TMainForm
- Left = 324
- Top = 77
- Width = 730
- Height = 625
- Caption = 'Polygon Renderer Benchmark'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- OldCreateOrder = True
- Position = poDesktopCenter
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object PnlTop: TPanel
- Left = 0
- Top = 0
- Width = 722
- Height = 364
- Align = alClient
- BevelOuter = bvNone
- BorderWidth = 10
- TabOrder = 0
- object Img: TImage32
- Left = 10
- Top = 10
- Width = 702
- Height = 344
- Align = alClient
- Bitmap.ResamplerClassName = 'TNearestResampler'
- BitmapAlign = baTopLeft
- Scale = 1.000000000000000000
- ScaleMode = smNormal
- TabOrder = 0
- OnResize = ImgResize
- end
- end
- object PnlBottom: TPanel
- Left = 0
- Top = 364
- Width = 722
- Height = 234
- Align = alBottom
- BevelOuter = bvNone
- BorderWidth = 10
- TabOrder = 1
- object GbxSettings: TGroupBox
- Left = 10
- Top = 10
- Width = 328
- Height = 214
- Align = alLeft
- Caption = 'Benchmark Settings'
- TabOrder = 0
- object LblTest: TLabel
- Left = 14
- Top = 34
- Width = 25
- Height = 13
- Caption = '&Test:'
- Color = clBtnFace
- FocusControl = CmbTest
- ParentColor = False
- Transparent = False
- end
- object LblRenderer: TLabel
- Left = 14
- Top = 61
- Width = 49
- Height = 13
- Caption = '&Renderer:'
- Color = clBtnFace
- FocusControl = CmbRenderer
- ParentColor = False
- Transparent = False
- end
- object BtnBenchmark: TButton
- Left = 14
- Top = 158
- Width = 139
- Height = 25
- Caption = 'Do &Benchmark'
- TabOrder = 4
- OnClick = BtnBenchmarkClick
- end
- object CmbTest: TComboBox
- Left = 78
- Top = 31
- Width = 225
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- end
- object CmbRenderer: TComboBox
- Left = 78
- Top = 58
- Width = 225
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 1
- end
- object CbxAllTests: TCheckBox
- Left = 14
- Top = 98
- Width = 112
- Height = 19
- Caption = 'Bench&mark all tests'
- TabOrder = 2
- end
- object CbxAllRenderers: TCheckBox
- Left = 14
- Top = 122
- Width = 135
- Height = 19
- Caption = 'Benchmar&k all renderers'
- TabOrder = 3
- end
- object BtnExit: TButton
- Left = 158
- Top = 158
- Width = 139
- Height = 25
- Cancel = True
- Caption = 'E&xit'
- TabOrder = 5
- OnClick = BtnExitClick
- end
- end
- object GbxResults: TGroupBox
- Left = 348
- Top = 10
- Width = 364
- Height = 214
- Align = alClient
- Caption = 'Benchmark Res&ults'
- TabOrder = 1
- object PnlBenchmark: TPanel
- Left = 2
- Top = 15
- Width = 360
- Height = 197
- Align = alClient
- BevelOuter = bvNone
- BorderWidth = 10
- TabOrder = 0
- object MemoLog: TMemo
- Left = 10
- Top = 10
- Width = 340
- Height = 177
- Align = alClient
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Pitch = fpFixed
- Font.Style = []
- ParentFont = False
- ScrollBars = ssVertical
- TabOrder = 0
- end
- end
- end
- object PnlSpacer: TPanel
- Left = 338
- Top = 10
- Width = 10
- Height = 214
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 2
- end
- end
- end
|