Unit1.dfm 6.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195
  1. object Form1: TForm1
  2. Left = 0
  3. Top = 0
  4. Caption = 'Newton Material'
  5. ClientHeight = 391
  6. ClientWidth = 598
  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. PixelsPerInch = 96
  16. TextHeight = 13
  17. object GLSceneViewer1: TGLSceneViewer
  18. Left = 0
  19. Top = 0
  20. Width = 598
  21. Height = 391
  22. Camera = GLCamera1
  23. Buffer.BackgroundColor = clBackground
  24. FieldOfView = 151.307739257812500000
  25. PenAsTouch = False
  26. Align = alClient
  27. TabOrder = 0
  28. end
  29. object GLScene1: TGLScene
  30. Left = 40
  31. Top = 24
  32. object GLCamera1: TGLCamera
  33. DepthOfView = 100.000000000000000000
  34. FocalLength = 50.000000000000000000
  35. TargetObject = GLDummyCube3
  36. Position.Coordinates = {000000000000A040000070C10000803F}
  37. object GLLightSource1: TGLLightSource
  38. ConstAttenuation = 1.000000000000000000
  39. SpotCutOff = 180.000000000000000000
  40. end
  41. end
  42. object GLDummyCube1: TGLDummyCube
  43. Position.Coordinates = {0000C0C000000000000000000000803F}
  44. CubeSize = 1.000000000000000000
  45. object GLSphere2: TGLSphere
  46. Position.Coordinates = {0000000000002041000000000000803F}
  47. Radius = 0.500000000000000000
  48. BehavioursData = {
  49. 0458434F4C02010201060D54474C4E474444796E616D69630200120000000002
  50. 000201060D474C4E47444D616E61676572310800090500000000000AD7A3F83F
  51. 1200000000020109050000000000CDCCCCFB3F050000000000000080FF3F0905
  52. 0000000000000000000002000802000802000900000000000000000000000000
  53. 00803F020008}
  54. end
  55. object GLSphere1: TGLSphere
  56. Position.Coordinates = {000000C000004040000000000000803F}
  57. Radius = 0.500000000000000000
  58. BehavioursData = {
  59. 0458434F4C02010201060D54474C4E474444796E616D69630200120000000002
  60. 000201060D474C4E47444D616E61676572310800090500000000000AD7A3F83F
  61. 1200000000020109050000000000CDCCCCFB3F050000000000000080FF3F0905
  62. 0000000000000000000002000802000802000900000000000000000000000000
  63. 00803F020008}
  64. end
  65. object GLCube1: TGLCube
  66. Position.Coordinates = {0000004000000040000000000000803F}
  67. BehavioursData = {
  68. 0458434F4C02010201060D54474C4E474444796E616D69630200120000000002
  69. 000201060D474C4E47444D616E61676572310800090500000000000AD7A3F83F
  70. 1200000000020109050000000000CDCCCCFB3F050000000000000080FF3F0905
  71. 0000000000000000000002000802000802000900000000000000000000000000
  72. 00803F020008}
  73. end
  74. object Trampoline: TGLCube
  75. Position.Coordinates = {00000000000080BF000000000000803F}
  76. BehavioursData = {
  77. 0458434F4C02010201060C54474C4E4744537461746963020012000000000200
  78. 0201060D474C4E47444D616E61676572310800090500000000000AD7A3F83F12
  79. 00000000}
  80. CubeSize = {000020410000803F00002041}
  81. end
  82. end
  83. object GLDummyCube2: TGLDummyCube
  84. Direction.Coordinates = {00000000ED83843EEA46773F00000000}
  85. PitchAngle = 15.000000000000000000
  86. Position.Coordinates = {0000A04000000000000000000000803F}
  87. Up.Coordinates = {00000000EA46773FED8384BE00000000}
  88. CubeSize = 1.000000000000000000
  89. object GLCube2: TGLCube
  90. Position.Coordinates = {0000004000000040000080400000803F}
  91. BehavioursData = {
  92. 0458434F4C02010201060D54474C4E474444796E616D69630200120000000002
  93. 000201060D474C4E47444D616E61676572310800090500000000000AD7A3F83F
  94. 1200000000020109050000000000CDCCCCFB3F050000000000000080FF3F0905
  95. 0000000000000000000002000802000802000900000000000000000000000000
  96. 00803F020008}
  97. end
  98. object GLCube3: TGLCube
  99. Position.Coordinates = {0000000000000040000080400000803F}
  100. BehavioursData = {
  101. 0458434F4C02010201060D54474C4E474444796E616D69630200120000000002
  102. 000201060D474C4E47444D616E61676572310800090500000000000AD7A3F83F
  103. 1200000000020109050000000000CDCCCCFB3F050000000000000080FF3F0905
  104. 0000000000000000000002000802000802000900000000000000000000000000
  105. 00803F020008}
  106. end
  107. object GLCube4: TGLCube
  108. Position.Coordinates = {000000C000000040000080400000803F}
  109. BehavioursData = {
  110. 0458434F4C02010201060D54474C4E474444796E616D69630200120000000002
  111. 000201060D474C4E47444D616E61676572310800090500000000000AD7A3F83F
  112. 1200000000020109050000000000CDCCCCFB3F050000000000000080FF3F0905
  113. 0000000000000000000002000802000802000900000000000000000000000000
  114. 00803F020008}
  115. end
  116. object Friction: TGLCube
  117. Position.Coordinates = {00000000000080BF000000000000803F}
  118. BehavioursData = {
  119. 0458434F4C02010201060C54474C4E4744537461746963020012000000000200
  120. 0201060D474C4E47444D616E61676572310800090500000000000AD7A3F83F12
  121. 00000000}
  122. CubeSize = {000020410000803F00002041}
  123. end
  124. end
  125. object GLDummyCube3: TGLDummyCube
  126. CubeSize = 1.000000000000000000
  127. end
  128. end
  129. object GLCadencer1: TGLCadencer
  130. Scene = GLScene1
  131. OnProgress = GLCadencer1Progress
  132. Left = 128
  133. Top = 24
  134. end
  135. object GLSimpleNavigation1: TGLSimpleNavigation
  136. Form = Owner
  137. GLSceneViewer = GLSceneViewer1
  138. FormCaption = 'Newton Material - %FPS'
  139. KeyCombinations = <
  140. item
  141. ShiftState = [ssLeft, ssRight]
  142. Action = snaZoom
  143. end
  144. item
  145. ShiftState = [ssLeft]
  146. Action = snaMoveAroundTarget
  147. end
  148. item
  149. ShiftState = [ssRight]
  150. Action = snaMoveAroundTarget
  151. end>
  152. Left = 40
  153. Top = 88
  154. end
  155. object GLNGDManager1: TGLNGDManager
  156. NewtonSurfaceItem = <
  157. item
  158. DisplayName = 'Trampoline'
  159. end
  160. item
  161. DisplayName = 'Friction'
  162. end
  163. item
  164. DisplayName = 'cube2'
  165. end
  166. item
  167. DisplayName = 'cube3'
  168. end
  169. item
  170. DisplayName = 'cube4'
  171. end
  172. item
  173. DisplayName = 'Sphere1+Sphere2+cube1'
  174. end>
  175. NewtonSurfacePair = <
  176. item
  177. Elasticity = 2.000000000000000000
  178. end
  179. item
  180. StaticFriction = 1.000000000000000000
  181. KineticFriction = 1.000000000000000000
  182. end
  183. item
  184. StaticFriction = 0.009999999776482582
  185. KineticFriction = 0.001000000047497451
  186. end
  187. item
  188. StaticFriction = 0.300000011920929000
  189. KineticFriction = 0.200000002980232200
  190. end>
  191. NewtonJoint = <>
  192. Left = 232
  193. Top = 24
  194. end
  195. end