fArchiverD.dfm 3.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121
  1. object Form1: TForm1
  2. Left = 333
  3. Top = 166
  4. Caption = 'Archive Loader'
  5. ClientHeight = 483
  6. ClientWidth = 629
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -11
  11. Font.Name = 'MS Sans Serif'
  12. Font.Style = []
  13. OnCreate = FormCreate
  14. TextHeight = 13
  15. object GLSceneViewer1: TGLSceneViewer
  16. Left = 0
  17. Top = 0
  18. Width = 629
  19. Height = 483
  20. Camera = GLCamera
  21. VSync = vsmSync
  22. Buffer.AntiAliasing = aa4xHQ
  23. FieldOfView = 156.605575561523400000
  24. PenAsTouch = False
  25. Align = alClient
  26. TabOrder = 0
  27. end
  28. object GLScene1: TGLScene
  29. Left = 128
  30. Top = 73
  31. object GLDummyCube1: TGLDummyCube
  32. CubeSize = 1.000000000000000000
  33. object GLCamera: TGLCamera
  34. DepthOfView = 100.000000000000000000
  35. FocalLength = 50.000000000000000000
  36. TargetObject = GLDummyCube1
  37. Position.Coordinates = {0000A0400000A0400000A0400000803F}
  38. object GLLightSource1: TGLLightSource
  39. ConstAttenuation = 0.500000000000000000
  40. LinearAttenuation = 0.100000001490116100
  41. Specular.Color = {CDCC4C3FCDCC4C3FCDCC4C3F0000803F}
  42. SpotCutOff = 180.000000000000000000
  43. end
  44. end
  45. end
  46. object GLPlane1: TGLPlane
  47. Material.FrontProperties.Diffuse.Color = {CFBC3C3EA19E9E3ECFBC3C3E0000803F}
  48. Material.FrontProperties.Shininess = 8
  49. Material.FrontProperties.Specular.Color = {6666663F6666663F6666663F0000803F}
  50. Material.DepthProperties.DepthCompareFunction = cfLess
  51. Material.Texture.Disabled = False
  52. Direction.Coordinates = {000000000000803F2EBD3BB300000000}
  53. PitchAngle = 90.000000000000000000
  54. ShowAxes = True
  55. Up.Coordinates = {000000002EBD3BB3000080BF00000000}
  56. Height = 10.000000000000000000
  57. Width = 10.000000000000000000
  58. XTiles = 20
  59. YTiles = 20
  60. Style = [psTileTexture]
  61. end
  62. object GLFreeForm: TGLFreeForm
  63. Position.Coordinates = {000080BF00000000000000000000803F}
  64. MaterialLibrary = GLMaterialLibrary1
  65. end
  66. object GLFreeForm1: TGLFreeForm
  67. Position.Coordinates = {0000803F00000000000000000000803F}
  68. Scale.Coordinates = {0000003F0000003F0000003F00000000}
  69. MaterialLibrary = GLMaterialLibrary1
  70. end
  71. object GLLightSource2: TGLLightSource
  72. ConstAttenuation = 1.000000000000000000
  73. Position.Coordinates = {0000000000004040000000000000803F}
  74. SpotCutOff = 180.000000000000000000
  75. end
  76. end
  77. object GLMaterialLibrary1: TGLMaterialLibrary
  78. Materials = <
  79. item
  80. Name = 'LibMaterial'
  81. Tag = 0
  82. end>
  83. Left = 127
  84. Top = 128
  85. end
  86. object GLCadencer1: TGLCadencer
  87. Scene = GLScene1
  88. Mode = cmApplicationIdle
  89. OnProgress = GLCadencer1Progress
  90. Left = 127
  91. Top = 180
  92. end
  93. object GLSArchiveManager1: TGLSArchiveManager
  94. Archives = <
  95. item
  96. Name = 'LibArchive'
  97. end>
  98. Left = 127
  99. Top = 232
  100. end
  101. object GLSimpleNavigation1: TGLSimpleNavigation
  102. Form = Owner
  103. GLSceneViewer = GLSceneViewer1
  104. FormCaption = 'Archive Loader - %FPS'
  105. KeyCombinations = <
  106. item
  107. ShiftState = [ssLeft, ssRight]
  108. Action = snaZoom
  109. end
  110. item
  111. ShiftState = [ssLeft]
  112. Action = snaMoveAroundTarget
  113. end
  114. item
  115. ShiftState = [ssRight]
  116. Action = snaMoveAroundTarget
  117. end>
  118. Left = 304
  119. Top = 88
  120. end
  121. end