object mainform: Tmainform Left = 237 Top = 208 Width = 800 Height = 600 HorzScrollBar.Visible = False VertScrollBar.Visible = False BorderIcons = [biSystemMenu, biMinimize] Caption = 'PC Gamer CDROM' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnActivate = FormActivate OnCreate = FormCreate OnKeyDown = FormKeyDown PixelsPerInch = 96 TextHeight = 13 object SpeedButton3: TSpeedButton Left = 24 Top = 24 Width = 65 Height = 17 Cursor = crHandPoint Caption = 'Utilities' end object SpeedButton4: TSpeedButton Left = 24 Top = 8 Width = 65 Height = 17 Cursor = crHandPoint Caption = 'Demos' end object Image1: TImage Left = 16 Top = 16 Width = 105 Height = 105 Visible = False end object listloader: TImage Left = 440 Top = 456 Width = 105 Height = 105 end object ImageX: TImage Left = 32 Top = 32 Width = 105 Height = 105 Visible = False end object bitbtn1: TImage Left = 24 Top = 240 Width = 97 Height = 97 Picture.Data = {} Transparent = True end object Image2: TImage Left = 24 Top = 140 Width = 105 Height = 105 Picture.Data = {} end object source: TListBox Left = 24 Top = 128 Width = 249 Height = 153 BorderStyle = bsNone Ctl3D = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ItemHeight = 13 Items.Strings = ( 'This month'#39's feature demo:' 'Ameriku' 'vegna ekki mjeri pabbi min' 'og ekki mjeri fiskur. Ja, eg' 'ert fra ameriku og eg ert stulka' 'fallega!!') ParentCtl3D = False ParentFont = False TabOrder = 10 Visible = False end object menudests: TListBox Left = 192 Top = 288 Width = 81 Height = 113 BorderStyle = bsNone Ctl3D = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] ItemHeight = 16 Items.Strings = ( '01' '02' '03' '08' '04' '06' '05' '09' '04' '07' '08') ParentCtl3D = False ParentFont = False TabOrder = 14 Visible = False end object menusource: TListBox Left = 112 Top = 288 Width = 81 Height = 113 BorderStyle = bsNone Ctl3D = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ItemHeight = 11 Items.Strings = ( 'item one' 'item two' 'item three' 'four' 'five' 'six' 'item seven' 'eight' 'niner' 'ten' 'ellefu') ParentCtl3D = False ParentFont = False TabOrder = 13 Visible = False end object xlist: TListBox Left = 24 Top = 288 Width = 81 Height = 113 BorderStyle = bsNone Ctl3D = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] ItemHeight = 16 ParentCtl3D = False ParentFont = False TabOrder = 16 Visible = False end object dbcomponents: TPanel Left = 32 Top = 296 Width = 273 Height = 201 Caption = 'dbcomponents' TabOrder = 17 Visible = False object df1: TDBText Left = 16 Top = 48 Width = 65 Height = 17 DataSource = DataSource1 end object df2: TDBText Left = 16 Top = 64 Width = 65 Height = 17 DataSource = DataSource1 end object df3: TDBText Left = 16 Top = 80 Width = 65 Height = 17 DataSource = DataSource1 end object df4: TDBText Left = 16 Top = 96 Width = 65 Height = 17 DataSource = DataSource1 end object df5: TDBText Left = 16 Top = 112 Width = 65 Height = 17 DataSource = DataSource1 end object df6: TDBText Left = 16 Top = 128 Width = 65 Height = 17 DataSource = DataSource1 end object df7: TDBText Left = 120 Top = 48 Width = 65 Height = 17 DataSource = DataSource1 end object df8: TDBText Left = 120 Top = 64 Width = 65 Height = 17 DataSource = DataSource1 end object df9: TDBText Left = 120 Top = 80 Width = 65 Height = 17 DataSource = DataSource1 end object df10: TDBText Left = 120 Top = 96 Width = 65 Height = 17 DataSource = DataSource1 end object dbdisplay: TListBox Left = 80 Top = 8 Width = 177 Height = 33 BorderStyle = bsNone Ctl3D = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ItemHeight = 13 ParentCtl3D = False ParentFont = False TabOrder = 0 Visible = False end object databases: TListBox Left = 192 Top = 64 Width = 65 Height = 57 ItemHeight = 13 Items.Strings = ( 'Reviews' 'Demos' 'Companies' 'Patches') TabOrder = 1 Visible = False end end object browsepanel: TPanel Left = 0 Top = 100 Width = 685 Height = 405 BevelOuter = bvNone Color = clNone Ctl3D = False ParentCtl3D = False TabOrder = 0 Visible = False object ib: TButton Left = 280 Top = 80 Width = 75 Height = 25 Caption = 'ib' TabOrder = 0 Visible = False end object pb: TButton Left = 280 Top = 72 Width = 75 Height = 25 Caption = 'ib' TabOrder = 1 Visible = False end object vb: TButton Left = 280 Top = 64 Width = 75 Height = 25 Caption = 'ib' TabOrder = 2 Visible = False end end object company: TPanel Left = 103 Top = 96 Width = 689 Height = 414 BevelOuter = bvNone Caption = 'company' Color = clAqua TabOrder = 6 Visible = False end object patches: TPanel Left = 103 Top = 104 Width = 689 Height = 414 BevelOuter = bvNone Caption = 'patches' Color = clLime TabOrder = 7 Visible = False object patchnotes: TDBText Left = 8 Top = 144 Width = 249 Height = 17 end end object cds: TPanel Left = 103 Top = 112 Width = 689 Height = 414 BevelOuter = bvNone Color = clSilver TabOrder = 8 Visible = False end object reviews: TPanel Left = 103 Top = 120 Width = 689 Height = 414 BevelOuter = bvNone Color = clFuchsia TabOrder = 9 Visible = False object rgametitle: TDBText Left = 16 Top = 72 Width = 481 Height = 17 end object rcategory: TDBText Left = 16 Top = 104 Width = 249 Height = 17 end object rissuepage: TDBText Left = 16 Top = 128 Width = 257 Height = 17 end object rconame: TDBText Left = 16 Top = 152 Width = 249 Height = 17 end object raddress: TDBText Left = 16 Top = 176 Width = 249 Height = 17 end object DBNavigator1: TDBNavigator Left = 8 Top = 360 Width = 240 Height = 25 DataSource = DataSource1 TabOrder = 0 end object dblook: TDBLookupListBox Left = 200 Top = 150 Width = 121 Height = 95 TabOrder = 1 end end object gamepanel: TPanel Left = -8 Top = 107 Width = 800 Height = 392 BevelOuter = bvNone Caption = 'gamepanel' Color = clBlue Ctl3D = False ParentCtl3D = False TabOrder = 23 Visible = False object screenie: TMemo Left = 77 Top = 32 Width = 795 Height = 369 BorderStyle = bsNone Color = clBlue Ctl3D = False Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -13 Font.Name = 'Small Fonts' Font.Pitch = fpFixed Font.Style = [] Lines.Strings = ( '' '' '' 'Coconut Monkey Adventure' '' 'Copyright 1999 Info-Coconut-Monkey-Com' '' '' '' '' '' '' '' '' '' '' '') ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 0 end object lineinput: TEdit Left = 32 Top = 367 Width = 753 Height = 26 BorderStyle = bsNone Color = clBlue Ctl3D = False Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -20 Font.Name = 'Small Fonts' Font.Pitch = fpFixed Font.Style = [] ParentCtl3D = False ParentFont = False TabOrder = 1 end object DummyLabel: TEdit Left = 0 Top = 367 Width = 33 Height = 26 BorderStyle = bsNone Color = clBlue Ctl3D = False Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -20 Font.Name = 'Small Fonts' Font.Pitch = fpFixed Font.Style = [fsBold] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 2 Text = '>>' end end object paths: TListBox Left = 24 Top = 96 Width = 97 Height = 25 ItemHeight = 13 TabOrder = 4 Visible = False end object ListBox1: TListBox Left = 640 Top = 520 Width = 145 Height = 49 ItemHeight = 13 Items.Strings = ( 'demos.html' 'add-ons.html' 'utilities.html' 'support.html' 'coconut.html' 'database.html' '') TabOrder = 2 Visible = False end object list: TOutline Left = 184 Top = 96 Width = 89 Height = 25 OutlineStyle = osPictureText ItemHeight = 18 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [] Color = clBlue ParentCtl3D = False Ctl3D = False TabOrder = 3 Visible = False BorderStyle = bsNone ItemSeparator = '\' PictureOpen.Data = {}