Unit1.dfm 2.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118
  1. object Form1: TForm1
  2. Left = 0
  3. Top = 0
  4. Caption = 'Formula'
  5. ClientHeight = 321
  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 = 17
  20. Width = 297
  21. Height = 304
  22. Camera = GLCamera1
  23. FieldOfView = 112.087295532226600000
  24. Align = alLeft
  25. OnMouseDown = GLSceneViewer1MouseDown
  26. OnMouseMove = GLSceneViewer1MouseMove
  27. TabOrder = 0
  28. end
  29. object GLSceneViewer2: TGLSceneViewer
  30. Left = 301
  31. Top = 17
  32. Width = 297
  33. Height = 304
  34. Camera = GLCamera2
  35. FieldOfView = 112.087295532226600000
  36. Align = alRight
  37. OnMouseDown = GLSceneViewer2MouseDown
  38. OnMouseMove = GLSceneViewer2MouseMove
  39. TabOrder = 1
  40. end
  41. object Panel1: TPanel
  42. Left = 0
  43. Top = 0
  44. Width = 598
  45. Height = 17
  46. Align = alTop
  47. BevelOuter = bvNone
  48. TabOrder = 2
  49. object Label1: TLabel
  50. Left = 0
  51. Top = 0
  52. Width = 297
  53. Height = 13
  54. Alignment = taCenter
  55. AutoSize = False
  56. Caption = 'FPS1'
  57. end
  58. object Label2: TLabel
  59. Left = 304
  60. Top = 0
  61. Width = 297
  62. Height = 13
  63. Alignment = taCenter
  64. AutoSize = False
  65. Caption = 'FPS2'
  66. end
  67. end
  68. object GLScene1: TGLScene
  69. Left = 32
  70. Top = 32
  71. object DummyCube1: TGLDummyCube
  72. CubeSize = 10.000000000000000000
  73. object Mesh1: TGLMesh
  74. Mode = mmTriangles
  75. VertexMode = vmVNC
  76. end
  77. end
  78. object GLLightSource1: TGLLightSource
  79. ConstAttenuation = 1.000000000000000000
  80. Position.Coordinates = {00008C42000048420000F0410000803F}
  81. SpotCutOff = 180.000000000000000000
  82. end
  83. object GLCamera1: TGLCamera
  84. DepthOfView = 100.000000000000000000
  85. FocalLength = 100.000000000000000000
  86. TargetObject = DummyCube1
  87. Position.Coordinates = {000048420000F0410000A0410000803F}
  88. end
  89. end
  90. object Timer1: TTimer
  91. Interval = 5000
  92. OnTimer = Timer1Timer
  93. Left = 192
  94. Top = 32
  95. end
  96. object GLScene2: TGLScene
  97. Left = 344
  98. Top = 32
  99. object DummyCube2: TGLDummyCube
  100. CubeSize = 10.000000000000000000
  101. object Mesh2: TGLMesh
  102. Mode = mmTriangles
  103. VertexMode = vmVNC
  104. end
  105. end
  106. object GLLightSource2: TGLLightSource
  107. ConstAttenuation = 1.000000000000000000
  108. Position.Coordinates = {00008C42000048420000F0410000803F}
  109. SpotCutOff = 180.000000000000000000
  110. end
  111. object GLCamera2: TGLCamera
  112. DepthOfView = 100.000000000000000000
  113. FocalLength = 100.000000000000000000
  114. TargetObject = DummyCube2
  115. Position.Coordinates = {000048420000F0410000A0410000803F}
  116. end
  117. end
  118. end