
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2282 8e941d3f-bd1b-0410-a28a-d453659cc2b4
121 lines
2.6 KiB
Plaintext
121 lines
2.6 KiB
Plaintext
object Form1: TForm1
|
|
Left = 342
|
|
Height = 555
|
|
Top = 135
|
|
Width = 569
|
|
Caption = 'Form1'
|
|
ClientHeight = 555
|
|
ClientWidth = 569
|
|
Menu = MainMenu1
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
LCLVersion = '0.9.31'
|
|
object PageControl1: TPageControl
|
|
Left = 0
|
|
Height = 555
|
|
Top = 0
|
|
Width = 328
|
|
ActivePage = ImageTabSheet
|
|
Align = alClient
|
|
TabIndex = 1
|
|
TabOrder = 0
|
|
object PaintBoxTabSheet: TTabSheet
|
|
Caption = 'TPaintBox'
|
|
ClientHeight = 509
|
|
ClientWidth = 354
|
|
object PaintBox1: TPaintBox
|
|
Left = 0
|
|
Height = 509
|
|
Top = 0
|
|
Width = 354
|
|
Align = alClient
|
|
OnPaint = PaintBox1Paint
|
|
end
|
|
end
|
|
object ImageTabSheet: TTabSheet
|
|
Caption = 'TImage'
|
|
ClientHeight = 516
|
|
ClientWidth = 322
|
|
object Image1: TImage
|
|
Left = 0
|
|
Height = 516
|
|
Top = 0
|
|
Width = 322
|
|
Align = alClient
|
|
end
|
|
end
|
|
object GraphicControlTabSheet: TTabSheet
|
|
Caption = 'TGraphicControl'
|
|
end
|
|
end
|
|
object ListView1: TListView
|
|
Left = 333
|
|
Height = 555
|
|
Top = 0
|
|
Width = 236
|
|
Align = alRight
|
|
Columns = <
|
|
item
|
|
Caption = 'Method'
|
|
Width = 100
|
|
end
|
|
item
|
|
Caption = 'FPS'
|
|
Width = 100
|
|
end>
|
|
TabOrder = 1
|
|
ViewStyle = vsReport
|
|
end
|
|
object Splitter1: TSplitter
|
|
Left = 328
|
|
Height = 555
|
|
Top = 0
|
|
Width = 5
|
|
Align = alRight
|
|
ResizeAnchor = akRight
|
|
end
|
|
object MainMenu1: TMainMenu
|
|
left = 447
|
|
top = 88
|
|
object MenuItem1: TMenuItem
|
|
Caption = 'Cache'
|
|
object MenuItem9: TMenuItem
|
|
Caption = 'Use cache'
|
|
object mnuHD50: TMenuItem
|
|
Caption = '50% HD (940x540)'
|
|
Checked = True
|
|
RadioItem = True
|
|
OnClick = mnuHD50Click
|
|
end
|
|
object mnuHD: TMenuItem
|
|
Caption = 'HD (1920x1050)'
|
|
RadioItem = True
|
|
OnClick = mnuHDClick
|
|
end
|
|
end
|
|
end
|
|
object MenuItem2: TMenuItem
|
|
Caption = 'Run tests'
|
|
object mnuTPaintBox: TMenuItem
|
|
Caption = 'TPaintbox'
|
|
OnClick = mnuTPaintBoxClick
|
|
end
|
|
object mnuTImage: TMenuItem
|
|
Caption = 'TImage'
|
|
OnClick = mnuTImageClick
|
|
end
|
|
object mnuTGraphicControl: TMenuItem
|
|
Caption = 'TGraphicControl'
|
|
OnClick = mnuTGraphicControlClick
|
|
end
|
|
object MenuItem7: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object MenuItem5: TMenuItem
|
|
Caption = 'Run all'
|
|
OnClick = MenuItem5Click
|
|
end
|
|
end
|
|
end
|
|
end
|