68 lines
1.3 KiB
Plaintext
68 lines
1.3 KiB
Plaintext
object Form1: TForm1
|
|
Left = 472
|
|
Height = 339
|
|
Top = 154
|
|
Width = 504
|
|
Caption = 'Test TBGRAVirtualScreen partial redraw'
|
|
ClientHeight = 339
|
|
ClientWidth = 504
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
LCLVersion = '1.8.2.0'
|
|
WindowState = wsMaximized
|
|
object VirtualScreen: TBGRAVirtualScreen
|
|
Left = 0
|
|
Height = 305
|
|
Top = 34
|
|
Width = 504
|
|
OnRedraw = VirtualScreenRedraw
|
|
Align = alClient
|
|
Alignment = taLeftJustify
|
|
Color = clWhite
|
|
ParentColor = False
|
|
TabOrder = 0
|
|
end
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Height = 34
|
|
Top = 0
|
|
Width = 504
|
|
Align = alTop
|
|
ClientHeight = 34
|
|
ClientWidth = 504
|
|
TabOrder = 1
|
|
object Label1: TLabel
|
|
Left = 6
|
|
Height = 17
|
|
Top = 8
|
|
Width = 30
|
|
Caption = 'Balls:'
|
|
ParentColor = False
|
|
end
|
|
object SpinEdit1: TSpinEdit
|
|
Left = 48
|
|
Height = 27
|
|
Top = 3
|
|
Width = 66
|
|
MinValue = 1
|
|
OnChange = SpinEdit1Change
|
|
TabOrder = 0
|
|
Value = 5
|
|
end
|
|
object CheckBox1: TCheckBox
|
|
Left = 128
|
|
Height = 22
|
|
Top = 5
|
|
Width = 86
|
|
Caption = 'Full redraw'
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object Timer1: TTimer
|
|
Interval = 10
|
|
OnTimer = Timer1Timer
|
|
left = 89
|
|
top = 75
|
|
end
|
|
end
|