object FormTree: TFormTree Left = 192 Top = 106 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Tree Editor' ClientHeight = 880 ClientWidth = 1288 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 168 TextHeight = 24 object GLSceneViewer1: TGLSceneViewer Left = 268 Top = 0 Width = 1020 Height = 880 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Camera = GLCamera1 FieldOfView = 167.033859252929700000 PenAsTouch = False Align = alClient OnMouseDown = GLSceneViewer1MouseDown OnMouseMove = GLSceneViewer1MouseMove TabOrder = 0 end object Panel1: TPanel Left = 0 Top = 0 Width = 268 Height = 880 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Align = alLeft TabOrder = 1 object Label1: TLabel Left = 14 Top = 175 Width = 108 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Branch Twist' end object Label2: TLabel Left = 14 Top = 42 Width = 50 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Depth' end object Label3: TLabel Left = 14 Top = 242 Width = 115 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Branch Angle' end object Label4: TLabel Left = 14 Top = 308 Width = 155 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Branch Angle Bias' end object Label5: TLabel Left = 14 Top = 375 Width = 101 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Branch Size' end object Label6: TLabel Left = 14 Top = 438 Width = 123 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Branch Radius' end object Label7: TLabel Left = 14 Top = 630 Width = 114 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Branch Noise' end object Label8: TLabel Left = 14 Top = 770 Width = 76 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Leaf Size' end object Label9: TLabel Left = 14 Top = 840 Width = 126 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Leaf Threshold' end object Label10: TLabel Left = 14 Top = 109 Width = 121 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Branch Facets' FocusControl = GLSceneViewer1 end object Label11: TLabel Left = 25 Top = 4 Width = 197 Height = 28 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Tree properties' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -23 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 14 Top = 560 Width = 122 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Random Seed' end object Label13: TLabel Left = 14 Top = 497 Width = 199 Height = 24 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'Center Branch Constant' end object TrackBar1: TTrackBar Left = 14 Top = 67 Width = 240 Height = 29 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 11 Position = 5 TabOrder = 0 ThumbLength = 18 OnChange = TrackBar1Change end object TrackBar2: TTrackBar Left = 14 Top = 200 Width = 240 Height = 29 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 180 Position = 45 TabOrder = 1 ThumbLength = 18 TickStyle = tsManual OnChange = TrackBar2Change end object TrackBar3: TTrackBar Left = 14 Top = 266 Width = 240 Height = 30 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 100 Position = 40 TabOrder = 2 ThumbLength = 18 TickStyle = tsManual OnChange = TrackBar3Change end object TrackBar4: TTrackBar Left = 14 Top = 333 Width = 240 Height = 29 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 100 Position = 60 TabOrder = 3 ThumbLength = 18 TickStyle = tsManual OnChange = TrackBar4Change end object TrackBar5: TTrackBar Left = 14 Top = 399 Width = 240 Height = 30 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 100 Position = 10 TabOrder = 4 ThumbLength = 18 TickStyle = tsManual OnChange = TrackBar5Change end object TrackBar6: TTrackBar Left = 14 Top = 462 Width = 240 Height = 30 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 25 Position = 3 TabOrder = 5 ThumbLength = 18 TickStyle = tsManual OnChange = TrackBar6Change end object TrackBar7: TTrackBar Left = 14 Top = 658 Width = 240 Height = 30 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 100 Position = 70 TabOrder = 6 ThumbLength = 18 TickStyle = tsManual OnChange = TrackBar7Change end object TrackBar8: TTrackBar Left = 14 Top = 798 Width = 240 Height = 30 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 100 Position = 20 TabOrder = 7 ThumbLength = 18 TickStyle = tsManual OnChange = TrackBar8Change end object TrackBar9: TTrackBar Left = 14 Top = 868 Width = 240 Height = 30 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 100 Position = 20 TabOrder = 8 ThumbLength = 18 TickStyle = tsManual OnChange = TrackBar9Change end object TrackBar10: TTrackBar Left = 14 Top = 133 Width = 240 Height = 30 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Min = 3 Position = 6 TabOrder = 9 ThumbLength = 18 OnChange = TrackBar10Change end object Edit1: TEdit Left = 14 Top = 588 Width = 184 Height = 32 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 TabOrder = 10 end object Button1: TButton Left = 205 Top = 588 Width = 37 Height = 37 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Caption = 'S' TabOrder = 11 OnClick = Button1Click end object CheckBox1: TCheckBox Left = 14 Top = 700 Width = 170 Height = 30 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Alignment = taLeftJustify Caption = 'Central Leader' TabOrder = 12 OnClick = CheckBox1Click end object TrackBar11: TTrackBar Left = 14 Top = 728 Width = 240 Height = 30 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 100 Position = 50 TabOrder = 13 ThumbLength = 18 TickStyle = tsManual OnChange = TrackBar11Change end object TrackBar12: TTrackBar Left = 14 Top = 522 Width = 240 Height = 29 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Max = 100 Position = 50 TabOrder = 14 ThumbLength = 18 TickStyle = tsManual OnChange = TrackBar12Change end end object GLScene1: TGLScene Left = 168 Top = 8 object GLDummyCube1: TGLDummyCube Position.Coordinates = {0000000000000000000020400000803F} CubeSize = 1.000000000000000000 object GLCamera1: TGLCamera DepthOfView = 100.000000000000000000 FocalLength = 50.000000000000000000 TargetObject = GLDummyCube1 Position.Coordinates = {000000000000A040000000000000803F} Direction.Coordinates = {00000000000080BF0000000000000000} Up.Coordinates = {00000000000000000000803F00000000} object GLLightSource1: TGLLightSource Ambient.Color = {0000003F0000003F0000003F0000803F} ConstAttenuation = 1.000000000000000000 SpotCutOff = 180.000000000000000000 end end end object GLFreeForm1: TGLFreeForm MaterialLibrary = GLMaterialLibrary1 end object GLPlane1: TGLPlane Material.FrontProperties.Diffuse.Color = {000000000000003F000000000000803F} Height = 10.000000000000000000 Width = 10.000000000000000000 end end object GLMaterialLibrary1: TGLMaterialLibrary Materials = < item Name = 'LibMaterial' Tag = 0 end> Left = 312 Top = 8 end object MainMenu1: TMainMenu Left = 416 Top = 8 object File1: TMenuItem Caption = '&File' object NewTree1: TMenuItem Caption = '&New Tree' OnClick = NewTree1Click end object LoadTree1: TMenuItem Caption = '&Load Tree ...' OnClick = LoadTree1Click end object SaveTree1: TMenuItem Caption = '&Save Tree ...' OnClick = SaveTree1Click end object N2: TMenuItem Caption = '-' end object ExportMesh1: TMenuItem Caption = 'Export &Mesh ...' OnClick = ExportMesh1Click end object ExportMaterialLibrary1: TMenuItem Caption = 'Export M&aterial Library ...' OnClick = ExportMaterialLibrary1Click end object N1: TMenuItem Caption = '-' end object Exit1: TMenuItem Caption = 'E&xit' OnClick = Exit1Click end end object Material1: TMenuItem Caption = 'Material' object LeafFrontTexture1: TMenuItem Caption = 'Leaf &Front Texture ...' OnClick = LeafFrontTexture1Click end object LeafBackTexture1: TMenuItem Caption = 'Leaf &Back Texture ...' OnClick = LeafBackTexture1Click end object BranchTexture1: TMenuItem Caption = 'B&ranch Texture ...' OnClick = BranchTexture1Click end end object miFPS: TMenuItem Caption = 'FPS' end end object OpenDialog1: TOpenDialog Filter = 'GLTree files (*.gltr)|*.gltr' FilterIndex = 0 Left = 504 Top = 8 end object SaveDialog1: TSaveDialog Filter = 'GLTree files (*.gltr)|*.gltr' FilterIndex = 0 Left = 416 Top = 64 end object SaveDialog2: TSaveDialog Filter = 'GLScene Mesh files (*.glsm)|*.glsm' FilterIndex = 0 Title = 'Export Mesh' Left = 504 Top = 64 end object SaveDialog3: TSaveDialog Filter = 'GLScene Material Library files (*.glml)|*.glml' FilterIndex = 0 Title = 'Export Material Library' Left = 504 Top = 120 end object OpenPictureDialog1: TOpenPictureDialog Left = 416 Top = 120 end object AsyncTimer1: TGLAsyncTimer Enabled = True OnTimer = AsyncTimer1Timer ThreadPriority = tpNormal Left = 232 Top = 72 end object GLCadencer1: TGLCadencer Scene = GLScene1 Mode = cmApplicationIdle OnProgress = GLCadencer1Progress Left = 232 Top = 8 end end