object FormMemViewer: TFormMemViewer Left = 173 Top = 99 Caption = 'Memory Viewer' ClientHeight = 305 ClientWidth = 477 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 14 object GLSceneViewer1: TGLSceneViewer Left = 0 Top = 0 Width = 342 Height = 305 Camera = GLCamera1 AfterRender = GLSceneViewer1AfterRender Buffer.BackgroundColor = clGray FieldOfView = 90.947013854980470000 PenAsTouch = False Align = alClient TabOrder = 0 end object Panel1: TPanel Left = 342 Top = 0 Width = 135 Height = 305 Align = alRight TabOrder = 1 object Label1: TLabel Left = 44 Top = 8 Width = 60 Height = 19 Caption = 'Options' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 33 Top = 48 Width = 86 Height = 14 Caption = 'Texture framerate' end object LabelFPS: TLabel Left = 40 Top = 240 Width = 20 Height = 14 Caption = 'FPS' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RB1to1: TRadioButton Tag = 1 Left = 55 Top = 80 Width = 41 Height = 17 Caption = '1:1' Checked = True TabOrder = 0 TabStop = True OnClick = RB1to1Click end object RB1to2: TRadioButton Tag = 2 Left = 55 Top = 112 Width = 41 Height = 17 Caption = '1:2' TabOrder = 1 OnClick = RB1to1Click end object RB1to10: TRadioButton Tag = 10 Left = 55 Top = 144 Width = 41 Height = 17 Caption = '1:10' TabOrder = 2 OnClick = RB1to1Click end object CheckBox1: TCheckBox Left = 55 Top = 200 Width = 57 Height = 17 Caption = 'VSync' TabOrder = 3 OnClick = CheckBox1Click end end object Timer1: TTimer OnTimer = Timer1Timer Left = 144 Top = 16 end object GLScene1: TGLScene Left = 16 Top = 16 object DummyCube1: TGLDummyCube CubeSize = 1.000000000000000000 object Cube1: TGLCube Material.Texture.ImageClassName = 'TGLBlankImage' Material.Texture.Image.ColorFormat = 6408 Material.Texture.MinFilter = miLinear Material.Texture.TextureMode = tmModulate Material.Texture.Disabled = False end end object GLLightSource1: TGLLightSource ConstAttenuation = 1.000000000000000000 Position.Coordinates = {0000204100002041000020410000803F} SpotCutOff = 180.000000000000000000 end object GLCamera1: TGLCamera DepthOfView = 100.000000000000000000 FocalLength = 150.000000000000000000 TargetObject = DummyCube1 Position.Coordinates = {0000A040000080400000A0400000803F} end end object GLMemoryViewer1: TGLMemoryViewer Camera = GLCamera1 Buffer.BackgroundColor = clRed Left = 72 Top = 16 end object GLCadencer1: TGLCadencer Scene = GLScene1 OnProgress = GLCadencer1Progress Left = 192 Top = 16 end end