Unit1.dfm 6.6 KB

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