fdSplines.dfm 1.6 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. object FormSplines: TFormSplines
  2. Left = 198
  3. Top = 140
  4. BorderWidth = 5
  5. Caption = 'Splines'
  6. ClientHeight = 436
  7. ClientWidth = 587
  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. TextHeight = 13
  16. object GLSceneViewer1: TGLSceneViewer
  17. Left = 0
  18. Top = 0
  19. Width = 587
  20. Height = 436
  21. Camera = GLCamera1
  22. Buffer.BackgroundColor = clTeal
  23. FieldOfView = 166.915924072265600000
  24. PenAsTouch = False
  25. Align = alClient
  26. OnMouseDown = GLSceneViewer1MouseDown
  27. OnMouseMove = GLSceneViewer1MouseMove
  28. TabOrder = 0
  29. end
  30. object GLScene1: TGLScene
  31. Left = 16
  32. Top = 16
  33. object Lines1: TGLLines
  34. AntiAliased = True
  35. LineWidth = 6.000000000000000000
  36. Nodes = <
  37. item
  38. X = -1.000000000000000000
  39. Y = -1.000000000000000000
  40. end
  41. item
  42. Color.Color = {0000803F0000803F000000000000803F}
  43. end
  44. item
  45. X = 1.000000000000000000
  46. Y = 1.000000000000000000
  47. Color.Color = {0000803F00000000000000000000803F}
  48. end>
  49. NodesAspect = lnaCube
  50. NodeSize = 0.500000000000000000
  51. SplineMode = lsmCubicSpline
  52. Options = [loUseNodeColorForLines]
  53. end
  54. object GLCamera1: TGLCamera
  55. DepthOfView = 100.000000000000000000
  56. FocalLength = 25.000000000000000000
  57. TargetObject = Lines1
  58. CameraStyle = csOrthogonal
  59. Position.Coordinates = {00000000000000000000A0400000803F}
  60. Left = 248
  61. Top = 152
  62. end
  63. end
  64. end