fFormulaD.dfm 2.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120
  1. object FormFormula: TFormFormula
  2. Left = 124
  3. Top = 110
  4. BorderWidth = 5
  5. Caption = 'Formula'
  6. ClientHeight = 279
  7. ClientWidth = 603
  8. Color = clBtnFace
  9. Font.Charset = DEFAULT_CHARSET
  10. Font.Color = clWindowText
  11. Font.Height = -11
  12. Font.Name = 'MS Sans Serif'
  13. Font.Style = []
  14. Position = poScreenCenter
  15. OnCreate = FormCreate
  16. TextHeight = 13
  17. object GLSceneViewer1: TGLSceneViewer
  18. Left = 0
  19. Top = 17
  20. Width = 297
  21. Height = 262
  22. Camera = GLCamera1
  23. FieldOfView = 105.286758422851600000
  24. PenAsTouch = False
  25. Align = alLeft
  26. OnMouseDown = GLSceneViewer1MouseDown
  27. OnMouseMove = GLSceneViewer1MouseMove
  28. TabOrder = 0
  29. end
  30. object GLSceneViewer2: TGLSceneViewer
  31. Left = 306
  32. Top = 17
  33. Width = 297
  34. Height = 262
  35. Camera = GLCamera2
  36. FieldOfView = 105.286758422851600000
  37. PenAsTouch = False
  38. Align = alRight
  39. OnMouseDown = GLSceneViewer1MouseDown
  40. OnMouseMove = GLSceneViewer1MouseMove
  41. TabOrder = 1
  42. end
  43. object Panel1: TPanel
  44. Left = 0
  45. Top = 0
  46. Width = 603
  47. Height = 17
  48. Align = alTop
  49. BevelOuter = bvNone
  50. TabOrder = 2
  51. object Label1: TLabel
  52. Left = 0
  53. Top = 0
  54. Width = 297
  55. Height = 13
  56. Alignment = taCenter
  57. AutoSize = False
  58. Caption = 'FPS1'
  59. end
  60. object Label2: TLabel
  61. Left = 304
  62. Top = 0
  63. Width = 297
  64. Height = 13
  65. Alignment = taCenter
  66. AutoSize = False
  67. Caption = 'FPS2'
  68. end
  69. end
  70. object GLScene1: TGLScene
  71. Left = 32
  72. Top = 32
  73. object DummyCube1: TGLDummyCube
  74. CubeSize = 10.000000000000000000
  75. object Mesh1: TGLMesh
  76. Mode = mmTriangles
  77. VertexMode = vmVNC
  78. end
  79. end
  80. object GLLightSource1: TGLLightSource
  81. ConstAttenuation = 1.000000000000000000
  82. Position.Coordinates = {00008C42000048420000F0410000803F}
  83. SpotCutOff = 180.000000000000000000
  84. end
  85. object GLCamera1: TGLCamera
  86. DepthOfView = 100.000000000000000000
  87. FocalLength = 100.000000000000000000
  88. TargetObject = DummyCube1
  89. Position.Coordinates = {000048420000F0410000A0410000803F}
  90. end
  91. end
  92. object Timer1: TTimer
  93. Interval = 5000
  94. OnTimer = Timer1Timer
  95. Left = 192
  96. Top = 32
  97. end
  98. object GLScene2: TGLScene
  99. Left = 344
  100. Top = 32
  101. object DummyCube2: TGLDummyCube
  102. CubeSize = 10.000000000000000000
  103. object Mesh2: TGLMesh
  104. Mode = mmTriangles
  105. VertexMode = vmVNC
  106. end
  107. end
  108. object GLLightSource2: TGLLightSource
  109. ConstAttenuation = 1.000000000000000000
  110. Position.Coordinates = {00008C42000048420000F0410000803F}
  111. SpotCutOff = 180.000000000000000000
  112. end
  113. object GLCamera2: TGLCamera
  114. DepthOfView = 100.000000000000000000
  115. FocalLength = 100.000000000000000000
  116. TargetObject = DummyCube2
  117. Position.Coordinates = {000048420000F0410000A0410000803F}
  118. end
  119. end
  120. end