fGameMenuC.dfm 2.5 KB

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