40 lines
941 B
Plaintext
40 lines
941 B
Plaintext
object Form1: TForm1
|
|
Left = 348
|
|
Height = 516
|
|
Top = 49
|
|
Width = 614
|
|
Caption = 'Form1'
|
|
ClientHeight = 516
|
|
ClientWidth = 614
|
|
OnCloseQuery = FormCloseQuery
|
|
OnCreate = FormCreate
|
|
OnKeyDown = FormKeyDown
|
|
LCLVersion = '1.1'
|
|
object BCGameGrid2: TBCGameGrid
|
|
Left = 6
|
|
Height = 508
|
|
Top = 8
|
|
Width = 608
|
|
GridWidth = 6
|
|
GridHeight = 6
|
|
BlockWidth = 60
|
|
BlockHeight = 50
|
|
OnRenderControl = BCGameGrid2RenderControl
|
|
OnClickControl = BCGameGrid2ClickControl
|
|
OnMouseDown = BCGameGrid2MouseDown
|
|
OnMouseMove = BCGameGrid2MouseMove
|
|
OnMouseUp = BCGameGrid2MouseUp
|
|
OnMouseEnter = BCGameGrid2MouseEnter
|
|
OnMouseLeave = BCGameGrid2MouseLeave
|
|
OnMouseWheel = BCGameGrid2MouseWheel
|
|
OnMouseWheelDown = BCGameGrid2MouseWheelDown
|
|
OnMouseWheelUp = BCGameGrid2MouseWheelUp
|
|
end
|
|
object Timer1: TTimer
|
|
Interval = 33
|
|
OnTimer = Timer1Timer
|
|
left = 40
|
|
top = 24
|
|
end
|
|
end
|