fProjectionD.dfm 3.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105
  1. object FormProjection: TFormProjection
  2. Left = 160
  3. Top = 79
  4. Margins.Left = 5
  5. Margins.Top = 5
  6. Margins.Right = 5
  7. Margins.Bottom = 5
  8. Caption = 'Projection'
  9. ClientHeight = 714
  10. ClientWidth = 959
  11. Color = clBtnFace
  12. Font.Charset = DEFAULT_CHARSET
  13. Font.Color = clWindowText
  14. Font.Height = -19
  15. Font.Name = 'MS Sans Serif'
  16. Font.Style = []
  17. Position = poScreenCenter
  18. OnCreate = FormCreate
  19. OnMouseWheel = FormMouseWheel
  20. PixelsPerInch = 168
  21. TextHeight = 24
  22. object SceneViewer: TGLSceneViewer
  23. Left = 0
  24. Top = 0
  25. Width = 959
  26. Height = 714
  27. Margins.Left = 5
  28. Margins.Top = 5
  29. Margins.Right = 5
  30. Margins.Bottom = 5
  31. Camera = GLCamera
  32. Buffer.BackgroundColor = clBlack
  33. Buffer.FaceCulling = False
  34. Buffer.AntiAliasing = aa4xHQ
  35. FieldOfView = 160.919235229492200000
  36. PenAsTouch = False
  37. Align = alClient
  38. OnMouseDown = SceneViewerMouseDown
  39. OnMouseMove = SceneViewerMouseMove
  40. TabOrder = 0
  41. end
  42. object GLScene1: TGLScene
  43. ObjectsSorting = osNone
  44. Left = 24
  45. Top = 24
  46. object GLCamera: TGLCamera
  47. DepthOfView = 100.000000000000000000
  48. FocalLength = 60.000000000000000000
  49. TargetObject = GLDummyCube
  50. Position.Coordinates = {0000E0400000A040000040400000803F}
  51. end
  52. object GLDummyCube: TGLDummyCube
  53. CubeSize = 1.000000000000000000
  54. object GLArrowLine1: TGLArrowLine
  55. Direction.Coordinates = {000000000000803F0000000000000000}
  56. Up.Coordinates = {0000000000000000000080BF00000000}
  57. BottomRadius = 0.100000001490116100
  58. Height = 1.000000000000000000
  59. TopRadius = 0.100000001490116100
  60. TopArrowHeadHeight = 0.500000000000000000
  61. TopArrowHeadRadius = 0.200000002980232200
  62. BottomArrowHeadHeight = 0.500000000000000000
  63. BottomArrowHeadRadius = 0.200000002980232200
  64. end
  65. object GLLightSource1: TGLLightSource
  66. ConstAttenuation = 1.000000000000000000
  67. Position.Coordinates = {0000484200004842000000000000803F}
  68. SpotCutOff = 180.000000000000000000
  69. end
  70. end
  71. object DirectOpenGL: TGLDirectOpenGL
  72. UseBuildList = False
  73. OnRender = DirectOpenGLRender
  74. Blend = False
  75. end
  76. object GLPoints: TGLPoints
  77. NoZWrite = False
  78. Static = False
  79. Size = 5.000000000000000000
  80. Style = psSmooth
  81. end
  82. object GLPlane: TGLPlane
  83. Material.FrontProperties.Diffuse.Color = {0000003F0000003F0000803F9A99193F}
  84. Material.BlendingMode = bmTransparency
  85. Material.MaterialOptions = [moNoLighting]
  86. Direction.Coordinates = {000000000000803F0000000000000000}
  87. Up.Coordinates = {00000000000000000000803F00000000}
  88. Height = 6.000000000000000000
  89. Width = 6.000000000000000000
  90. object GLXYZGrid1: TGLXYZGrid
  91. LineColor.Color = {0000803F0000803F0000803F0000003F}
  92. XSamplingScale.Min = -3.000000000000000000
  93. XSamplingScale.Max = 3.000000000000000000
  94. XSamplingScale.Origin = 1.000000000000000000
  95. XSamplingScale.Step = 0.500000000000000000
  96. YSamplingScale.Min = -3.000000000000000000
  97. YSamplingScale.Max = 3.000000000000000000
  98. YSamplingScale.Step = 0.500000000000000000
  99. ZSamplingScale.Min = -3.000000000000000000
  100. ZSamplingScale.Max = 3.000000000000000000
  101. ZSamplingScale.Step = 0.100000001490116100
  102. end
  103. end
  104. end
  105. end