fDceDemoD.dfm 6.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201
  1. object FormDCE: TFormDCE
  2. Left = 192
  3. Top = 114
  4. Caption = 'GLScene Dynamic Collision Engine'
  5. ClientHeight = 640
  6. ClientWidth = 926
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -11
  11. Font.Name = 'MS Sans Serif'
  12. Font.Style = []
  13. KeyPreview = True
  14. Position = poScreenCenter
  15. OnKeyDown = FormKeyDown
  16. OnShow = FormShow
  17. TextHeight = 13
  18. object GLSceneViewer1: TGLSceneViewer
  19. Left = 0
  20. Top = 0
  21. Width = 926
  22. Height = 640
  23. Camera = GLCamera1
  24. Buffer.FogEnvironment.FogStart = 50.000000000000000000
  25. Buffer.FogEnvironment.FogEnd = 250.000000000000000000
  26. Buffer.BackgroundColor = clBlack
  27. Buffer.FogEnable = True
  28. FieldOfView = 162.238677978515600000
  29. PenAsTouch = False
  30. Align = alClient
  31. OnMouseMove = GLSceneViewer1MouseMove
  32. TabOrder = 0
  33. ExplicitWidth = 890
  34. ExplicitHeight = 606
  35. end
  36. object GLScene1: TGLScene
  37. Left = 24
  38. Top = 8
  39. object GLLightSource2: TGLLightSource
  40. ConstAttenuation = 1.000000000000000000
  41. Position.Coordinates = {00000000000048420000C8420000803F}
  42. SpotCutOff = 180.000000000000000000
  43. end
  44. object Terrain: TGLTerrainRenderer
  45. Material.MaterialLibrary = GLMatLib
  46. HeightDataSource = GLBitmapHDS1
  47. TilesPerTexture = 1.000000000000000000
  48. ContourWidth = 0
  49. BehavioursData = {
  50. 0458434F4C02010201060C54474C444345537461746963020102001200000000
  51. 0200060D474C4443454D616E61676572310203020009090F0000A0410F000000
  52. 00020008}
  53. end
  54. object Ground: TGLPlane
  55. Material.FrontProperties.Diffuse.Color = {D3D2D23EC7C6463FC7C6C63E0000803F}
  56. Material.MaterialLibrary = GLMatLib
  57. Direction.Coordinates = {000000000000803F0000000000000000}
  58. Position.Coordinates = {00000000000010C0000000000000803F}
  59. Scale.Coordinates = {0000FA430000FA430000803F00000000}
  60. Up.Coordinates = {00000000000000000000803F00000000}
  61. Visible = False
  62. Height = 1.000000000000000000
  63. Width = 1.000000000000000000
  64. XTiles = 50
  65. YTiles = 50
  66. Style = []
  67. BehavioursData = {
  68. 0458434F4C02010201060C54474C444345537461746963020102001200000000
  69. 0200060D474C4443454D616E61676572310201020009080F0000A0410F000000
  70. 00020008}
  71. end
  72. object Balls: TGLDummyCube
  73. CubeSize = 1.000000000000000000
  74. end
  75. object moMushroom: TGLFreeForm
  76. Material.FrontProperties.Diffuse.Color = {A9A8283F8B8A8A3E9190103E0000803F}
  77. Position.Coordinates = {00000000000000000000A0C00000803F}
  78. NormalsOrientation = mnoInvert
  79. BehavioursData = {
  80. 0458434F4C02010201060C54474C444345537461746963020102001200000000
  81. 0200060D474C4443454D616E61676572310202020009090F0000803F0F000000
  82. 00020008}
  83. end
  84. object Mushrooms: TGLDummyCube
  85. CubeSize = 1.000000000000000000
  86. end
  87. object GLCube1: TGLCube
  88. Material.FrontProperties.Diffuse.Color = {B1B0B03D9998183F8180003D0000803F}
  89. Direction.Coordinates = {00000000CAA8073FAE19593F00000000}
  90. PitchAngle = 32.000000000000000000
  91. Position.Coordinates = {0000804000000000000020410000803F}
  92. Scale.Coordinates = {0000A041000080400000204100000000}
  93. Up.Coordinates = {00000000AE19593FCAA807BF00000000}
  94. BehavioursData = {
  95. 0458434F4C02010201060C54474C444345537461746963020102001200000000
  96. 0200060D474C4443454D616E61676572310201020009090F0000F0410F000000
  97. 00020008}
  98. end
  99. object GLDirectOpenGL1: TGLDirectOpenGL
  100. Visible = False
  101. UseBuildList = False
  102. OnRender = GLDirectOpenGL1Render
  103. Blend = False
  104. end
  105. object Player: TGLDummyCube
  106. Position.Coordinates = {000000000000803F000000000000803F}
  107. CubeSize = 1.000000000000000000
  108. BehavioursData = {
  109. 0458434F4C02010201060D54474C44434544796E616D69630201020012000000
  110. 000200060D474C4443454D616E616765723102000909090F0000003F0F000000
  111. 00020502000200090000803F0000A03F0000803F00000000}
  112. object GLCamera1: TGLCamera
  113. DepthOfView = 300.000000000000000000
  114. FocalLength = 50.000000000000000000
  115. TargetObject = Player
  116. Position.Coordinates = {0000000000000040000040C00000803F}
  117. object GLLightSource1: TGLLightSource
  118. ConstAttenuation = 1.000000000000000000
  119. SpotCutOff = 180.000000000000000000
  120. end
  121. end
  122. object GLActor1: TGLActor
  123. Material.MaterialLibrary = GLMatLib
  124. Interval = 100
  125. end
  126. object GLSphere1: TGLSphere
  127. Material.FrontProperties.Ambient.Color = {0000803F9190903D000000000000803F}
  128. Material.FrontProperties.Diffuse.Color = {BFBE3E3F00000000000000006DE77B3E}
  129. Material.FrontProperties.Emission.Color = {0000000000000000A1A0203D0000803F}
  130. Material.BlendingMode = bmAdditive
  131. Radius = 1.000000000000000000
  132. end
  133. end
  134. object GLHUDText1: TGLHUDText
  135. Position.Coordinates = {0000204100000000000000000000803F}
  136. BitmapFont = GLWindowsBitmapFont1
  137. Rotation = 0.000000000000000000
  138. end
  139. object HUDTextCoords: TGLHUDText
  140. Position.Coordinates = {000020410000A041000000000000803F}
  141. BitmapFont = GLWindowsBitmapFont1
  142. Rotation = 0.000000000000000000
  143. end
  144. object Help: TGLHUDText
  145. Position.Coordinates = {0000204100002042000000000000803F}
  146. BitmapFont = GLWindowsBitmapFont1
  147. Rotation = 0.000000000000000000
  148. end
  149. object HelpShadow: TGLHUDText
  150. Position.Coordinates = {0000304100002442000000000000803F}
  151. Rotation = 0.000000000000000000
  152. ModulateColor.Color = {A19E9E3ECFBC3C3ECFBC3C3E0000803F}
  153. end
  154. end
  155. object GLCadencer1: TGLCadencer
  156. Scene = GLScene1
  157. Enabled = False
  158. OnProgress = GLCadencer1Progress
  159. Left = 96
  160. Top = 8
  161. end
  162. object GLDCEManager1: TGLDCEManager
  163. Gravity = -30.000000000000000000
  164. WorldScale = 1.000000000000000000
  165. MovimentScale = 1.000000000000000000
  166. StandardiseLayers = ccsDCEStandard
  167. ManualStep = False
  168. Left = 192
  169. Top = 8
  170. end
  171. object GLBitmapHDS1: TGLBitmapHDS
  172. MaxPoolSize = 0
  173. Left = 24
  174. Top = 72
  175. end
  176. object GLMatLib: TGLMaterialLibrary
  177. Left = 96
  178. Top = 72
  179. end
  180. object GLWindowsBitmapFont1: TGLWindowsBitmapFont
  181. Font.Charset = ANSI_CHARSET
  182. Font.Color = clWhite
  183. Font.Height = -16
  184. Font.Name = 'Impact'
  185. Font.Style = []
  186. Ranges = <
  187. item
  188. StartASCII = ' '
  189. StopASCII = 'z'
  190. StartGlyphIdx = 0
  191. end>
  192. Left = 192
  193. Top = 72
  194. end
  195. object Timer1: TTimer
  196. Interval = 500
  197. OnTimer = Timer1Timer
  198. Left = 496
  199. Top = 16
  200. end
  201. end