fGameMenuD.dfm 2.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109
  1. object FormGameMenu: TFormGameMenu
  2. Left = 192
  3. Top = 114
  4. Margins.Left = 2
  5. Margins.Top = 2
  6. Margins.Right = 2
  7. Margins.Bottom = 2
  8. Caption = 'Game Menu'
  9. ClientHeight = 449
  10. ClientWidth = 557
  11. Color = clBtnFace
  12. Font.Charset = DEFAULT_CHARSET
  13. Font.Color = clWindowText
  14. Font.Height = -11
  15. Font.Name = 'MS Sans Serif'
  16. Font.Style = []
  17. Position = poScreenCenter
  18. OnCreate = FormCreate
  19. OnKeyPress = FormKeyPress
  20. TextHeight = 13
  21. object GLSceneViewer1: TGLSceneViewer
  22. Left = 0
  23. Top = 0
  24. Width = 557
  25. Height = 422
  26. Camera = GLCamera1
  27. Buffer.BackgroundColor = clGray
  28. FieldOfView = 153.337402343750000000
  29. PenAsTouch = False
  30. Align = alClient
  31. OnMouseDown = GLSceneViewer1MouseDown
  32. OnMouseMove = GLSceneViewer1MouseMove
  33. TabOrder = 0
  34. end
  35. object MainPanel: TPanel
  36. Left = 0
  37. Top = 422
  38. Width = 557
  39. Height = 27
  40. Align = alBottom
  41. TabOrder = 1
  42. OnResize = MainPanelResize
  43. object Label1: TLabel
  44. Left = 144
  45. Top = 6
  46. Width = 234
  47. Height = 13
  48. Caption = 'Press "W" or "S" to navigate or "Enter" to select '
  49. end
  50. object ShowTitleCheckbox: TCheckBox
  51. Left = 8
  52. Top = 6
  53. Width = 81
  54. Height = 17
  55. Caption = 'Show Title'
  56. Checked = True
  57. State = cbChecked
  58. TabOrder = 0
  59. OnClick = ShowTitleCheckboxClick
  60. OnKeyPress = FormKeyPress
  61. end
  62. end
  63. object GLScene1: TGLScene
  64. Left = 40
  65. Top = 8
  66. object GLDummyCube1: TGLDummyCube
  67. CubeSize = 1.000000000000000000
  68. object GLCube1: TGLCube
  69. Position.Coordinates = {0000803F00000000000000000000803F}
  70. end
  71. end
  72. object GLCamera1: TGLCamera
  73. DepthOfView = 100.000000000000000000
  74. FocalLength = 50.000000000000000000
  75. TargetObject = GLDummyCube1
  76. Position.Coordinates = {0000404000004040000040400000803F}
  77. object GLLightSource1: TGLLightSource
  78. ConstAttenuation = 1.000000000000000000
  79. Position.Coordinates = {0000204100002041000020410000803F}
  80. SpotCutOff = 180.000000000000000000
  81. end
  82. end
  83. end
  84. object GLWindowsBitmapFont1: TGLWindowsBitmapFont
  85. Font.Charset = DEFAULT_CHARSET
  86. Font.Color = clWhite
  87. Font.Height = -32
  88. Font.Name = 'MS Sans Serif'
  89. Font.Style = []
  90. Left = 128
  91. Top = 8
  92. end
  93. object GLCadencer1: TGLCadencer
  94. Scene = GLScene1
  95. OnProgress = GLCadencer1Progress
  96. Left = 40
  97. Top = 72
  98. end
  99. object GLMaterialLibrary1: TGLMaterialLibrary
  100. Materials = <
  101. item
  102. Name = 'LibMaterial'
  103. Tag = 0
  104. Material.Texture.Disabled = False
  105. end>
  106. Left = 128
  107. Top = 72
  108. end
  109. end