Unit1.dfm 2.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104
  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. Align = alClient
  27. OnMouseDown = GLSceneViewer1MouseDown
  28. OnMouseMove = GLSceneViewer1MouseMove
  29. TabOrder = 0
  30. end
  31. object MainPanel: TPanel
  32. Left = 0
  33. Top = 409
  34. Width = 553
  35. Height = 27
  36. Align = alBottom
  37. TabOrder = 1
  38. OnResize = MainPanelResize
  39. object Label1: TLabel
  40. Left = 144
  41. Top = 6
  42. Width = 232
  43. Height = 13
  44. Caption = 'Press "W" or "S" to navigate or "Enter" to select '
  45. end
  46. object ShowTitleCheckbox: TCheckBox
  47. Left = 8
  48. Top = 6
  49. Width = 81
  50. Height = 17
  51. Caption = 'Show Title'
  52. Checked = True
  53. State = cbChecked
  54. TabOrder = 0
  55. OnClick = ShowTitleCheckboxClick
  56. end
  57. end
  58. object GLScene1: TGLScene
  59. Left = 40
  60. Top = 8
  61. object GLDummyCube1: TGLDummyCube
  62. CubeSize = 1.000000000000000000
  63. object GLCube1: TGLCube
  64. Position.Coordinates = {0000803F00000000000000000000803F}
  65. end
  66. end
  67. object GLCamera1: TGLCamera
  68. DepthOfView = 100.000000000000000000
  69. FocalLength = 50.000000000000000000
  70. TargetObject = GLDummyCube1
  71. Position.Coordinates = {0000404000004040000040400000803F}
  72. object GLLightSource1: TGLLightSource
  73. ConstAttenuation = 1.000000000000000000
  74. Position.Coordinates = {0000204100002041000020410000803F}
  75. SpotCutOff = 180.000000000000000000
  76. end
  77. end
  78. end
  79. object GLWindowsBitmapFont1: TGLWindowsBitmapFont
  80. Font.Charset = DEFAULT_CHARSET
  81. Font.Color = clWhite
  82. Font.Height = -32
  83. Font.Name = 'MS Sans Serif'
  84. Font.Style = []
  85. Left = 128
  86. Top = 8
  87. end
  88. object GLCadencer1: TGLCadencer
  89. Scene = GLScene1
  90. OnProgress = GLCadencer1Progress
  91. Left = 40
  92. Top = 72
  93. end
  94. object GLMaterialLibrary1: TGLMaterialLibrary
  95. Materials = <
  96. item
  97. Name = 'LibMaterial'
  98. Tag = 0
  99. Material.Texture.Disabled = False
  100. end>
  101. Left = 128
  102. Top = 72
  103. end
  104. end