object frmOctreeDemo: TfrmOctreeDemo Left = 309 Top = 207 Caption = 'Octree Demo' ClientHeight = 553 ClientWidth = 770 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object GLSceneViewer1: TGLSceneViewer Left = 0 Top = 81 Width = 770 Height = 472 Camera = GLCamera1 Buffer.BackgroundColor = clBackground Buffer.FaceCulling = False FieldOfView = 144.739837646484400000 PenAsTouch = False Align = alClient TabOrder = 0 end object Panel1: TPanel Left = 0 Top = 0 Width = 770 Height = 81 Align = alTop TabOrder = 1 DesignSize = ( 770 81) object Label3: TLabel Left = 16 Top = 8 Width = 71 Height = 13 Caption = 'Leaf Threshold' end object Label2: TLabel Left = 120 Top = 8 Width = 388 Height = 13 Caption = '(Green = Colliding with other object, Red = inside query box/sph' + 'ere, Yellow = both)' end object LabelCollisions: TLabel Left = 527 Top = 34 Width = 43 Height = 13 Alignment = taRightJustify Anchors = [akTop, akRight] Caption = 'Collisions' end object TrackBar_LeafThreshold: TTrackBar Left = 8 Top = 24 Width = 150 Height = 25 Max = 20 Min = 3 Position = 10 TabOrder = 0 TickStyle = tsNone OnChange = TrackBar_LeafThresholdChange end object Button_ResetOctreeSize: TButton Left = 272 Top = 27 Width = 105 Height = 21 Caption = 'Reset Octree Size' TabOrder = 1 OnClick = Button_ResetOctreeSizeClick end end object GLScene1: TGLScene Left = 16 Top = 64 object GLDummyCube1: TGLDummyCube CubeSize = 1.000000000000000000 end object GLDirectOpenGL1: TGLDirectOpenGL UseBuildList = False OnRender = GLDirectOpenGL1Render Blend = False end object GLCube1: TGLCube Material.MaterialLibrary = GLMaterialLibrary1 Material.LibMaterialName = 'CommonMaterial' CubeSize = {0000A0400000A04000000041} end object GLSphere1: TGLSphere Material.MaterialLibrary = GLMaterialLibrary1 Material.LibMaterialName = 'CommonMaterial' Position.Coordinates = {0000C0400000C0400000C0400000803F} Radius = 2.500000000000000000 end object GLPlane1: TGLPlane Material.FrontProperties.Diffuse.Color = {CDCC4C3FCDCC4C3FCDCC4C3FCDCC4C3E} Material.BlendingMode = bmTransparency Direction.Coordinates = {0000000000000080000080BF00000000} Position.Coordinates = {0000000000000000000020410000803F} Up.Coordinates = {6A41323FD9BD373F0000000000000000} Visible = False Height = 40.000000000000000000 Width = 40.000000000000000000 end object GLLines1: TGLLines Nodes = <> Options = [] end object GLCamera1: TGLCamera DepthOfView = 100.000000000000000000 FocalLength = 75.000000000000000000 TargetObject = GLDummyCube1 Position.Coordinates = {0000004200006041000090410000803F} object GLLightSource1: TGLLightSource ConstAttenuation = 1.000000000000000000 SpotCutOff = 180.000000000000000000 end end end object GLCadencer1: TGLCadencer Scene = GLScene1 OnProgress = GLCadencer1Progress Left = 16 Top = 120 end object GLSimpleNavigation1: TGLSimpleNavigation Form = Owner GLSceneViewer = GLSceneViewer1 ZoomSpeed = 1.250000000000000000 FormCaption = 'GLScene Octree - %FPS' KeyCombinations = < item ShiftState = [ssLeft, ssRight] Action = snaZoom end item ShiftState = [ssLeft] Action = snaMoveAroundTarget end item ShiftState = [ssRight] Action = snaMoveAroundTarget end> Left = 16 Top = 176 end object GLMaterialLibrary1: TGLMaterialLibrary Materials = < item Name = 'CommonMaterial' Tag = 0 Material.FrontProperties.Diffuse.Color = {CDCC4C3FCDCC4C3FCDCC4C3FCDCCCC3E} Material.DepthProperties.DepthTest = False Material.DepthProperties.DepthWrite = False Material.BlendingMode = bmTransparency Material.FaceCulling = fcCull end> Left = 16 Top = 224 end end