umain.lfm 941 B

123456789101112131415161718192021222324252627282930313233343536373839
  1. object Form1: TForm1
  2. Left = 348
  3. Height = 516
  4. Top = 49
  5. Width = 614
  6. Caption = 'Form1'
  7. ClientHeight = 516
  8. ClientWidth = 614
  9. OnCloseQuery = FormCloseQuery
  10. OnCreate = FormCreate
  11. OnKeyDown = FormKeyDown
  12. LCLVersion = '1.1'
  13. object BCGameGrid2: TBCGameGrid
  14. Left = 6
  15. Height = 508
  16. Top = 8
  17. Width = 608
  18. GridWidth = 6
  19. GridHeight = 6
  20. BlockWidth = 60
  21. BlockHeight = 50
  22. OnRenderControl = BCGameGrid2RenderControl
  23. OnClickControl = BCGameGrid2ClickControl
  24. OnMouseDown = BCGameGrid2MouseDown
  25. OnMouseMove = BCGameGrid2MouseMove
  26. OnMouseUp = BCGameGrid2MouseUp
  27. OnMouseEnter = BCGameGrid2MouseEnter
  28. OnMouseLeave = BCGameGrid2MouseLeave
  29. OnMouseWheel = BCGameGrid2MouseWheel
  30. OnMouseWheelDown = BCGameGrid2MouseWheelDown
  31. OnMouseWheelUp = BCGameGrid2MouseWheelUp
  32. end
  33. object Timer1: TTimer
  34. Interval = 33
  35. OnTimer = Timer1Timer
  36. left = 40
  37. top = 24
  38. end
  39. end