object FormCompany: TFormCompany Left = 141 Top = 106 ActiveControl = CompanyNavigator BorderStyle = bsDialog Caption = 'PC Gamer DISC' ClientHeight = 449 ClientWidth = 632 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] KeyPreview = True Position = poScreenCenter Scaled = False OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnKeyDown = FormKeyDown PixelsPerInch = 96 TextHeight = 17 object Image1: TImage Left = 0 Top = 0 Width = 632 Height = 449 AutoSize = True OnMouseMove = AllMouseMove end object LabelCompanyDatabase: TLabel Left = 360 Top = 0 Width = 219 Height = 18 Caption = 'Company Information Database' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object LabelCompany: TLabel Left = 120 Top = 62 Width = 67 Height = 17 Caption = 'Company:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object DBText1: TDBText Left = 120 Top = 84 Width = 257 Height = 69 DataField = 'CONAME' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -23 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True WordWrap = True end object LabelTechNumber: TLabel Left = 120 Top = 161 Width = 92 Height = 17 Caption = 'Tech Support:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object DBText2: TDBText Left = 120 Top = 178 Width = 62 Height = 18 AutoSize = True DataField = 'TECHNUMBER' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object LabelAddress: TLabel Left = 388 Top = 62 Width = 58 Height = 17 Caption = 'Address:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object DBText3: TDBText Left = 388 Top = 84 Width = 237 Height = 36 DataField = 'ADDRESS' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True WordWrap = True end object DBText4: TDBText Left = 388 Top = 123 Width = 62 Height = 18 AutoSize = True DataField = 'CITY' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object DBText5: TDBText Left = 388 Top = 143 Width = 62 Height = 18 AutoSize = True DataField = 'STATE' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object DBText6: TDBText Left = 441 Top = 143 Width = 62 Height = 18 AutoSize = True DataField = 'ZIP' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object LabelWebSite: TLabel Left = 120 Top = 249 Width = 64 Height = 17 Caption = 'Web Site:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object DBText7: TDBText Left = 120 Top = 266 Width = 62 Height = 18 AutoSize = True DataField = 'URL' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object LabelOrderNumber: TLabel Left = 120 Top = 204 Width = 90 Height = 17 Caption = 'Order Hotline:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object DBText8: TDBText Left = 120 Top = 221 Width = 62 Height = 18 AutoSize = True DataField = 'ORDERNUMBE' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object LabelEmail: TLabel Left = 388 Top = 249 Width = 102 Height = 17 Caption = 'E-Mail Address:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object DBText9: TDBText Left = 388 Top = 266 Width = 62 Height = 18 AutoSize = True DataField = 'EMAIL' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object LabelNotes: TLabel Left = 120 Top = 290 Width = 42 Height = 17 Caption = 'Notes:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object DBText10: TDBText Left = 120 Top = 312 Width = 505 Height = 97 DataField = 'NOTES' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True WordWrap = True end object LabelTypeStr: TLabel Left = 121 Top = 425 Width = 79 Height = 16 Caption = 'Type a string:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object LabelContactNumber: TLabel Left = 388 Top = 204 Width = 111 Height = 17 Caption = 'Contact Number:' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object DBText11: TDBText Left = 388 Top = 221 Width = 70 Height = 18 AutoSize = True DataField = 'MAINCONUMB' DataSource = CompanyDataSource Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object LabMenu: TLabel Left = 20 Top = 72 Width = 40 Height = 36 Alignment = taCenter Caption = 'Main Menu' Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentColor = False ParentFont = False WordWrap = True OnClick = LabMenuClick OnMouseMove = AllMouseMove end object LabClose: TLabel Left = 20 Top = 360 Width = 41 Height = 18 Alignment = taCenter Caption = 'Close' Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentColor = False ParentFont = False WordWrap = True OnClick = LabCloseClick OnMouseMove = AllMouseMove end object LabSearch: TLabel Left = 15 Top = 128 Width = 50 Height = 36 Alignment = taCenter Caption = 'Search Dialog' Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentColor = False ParentFont = False WordWrap = True OnClick = LabSearchClick OnMouseMove = AllMouseMove end object CompanyNavigator: TDBNavigator Left = 432 Top = 37 Width = 188 Height = 20 DataSource = CompanyDataSource VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast] ParentShowHint = False ShowHint = True TabOrder = 0 TabStop = True end object EditSearch: TEdit Left = 204 Top = 421 Width = 188 Height = 25 Color = clSilver TabOrder = 1 OnKeyDown = EditSearchKeyDown end object BtnSearch: TButton Left = 402 Top = 421 Width = 97 Height = 25 Caption = 'Search' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = BtnSearchClick end object BtnSearchAgain: TButton Left = 506 Top = 421 Width = 121 Height = 25 Caption = 'Search Again' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = BtnSearchAgainClick end object CompanyTable: TMDBFTable About = 'MiTeC DBF Table 1.35 - � 1997-98, MichaL MutL' FileName = 'company.dbf' SaveData = False Left = 16 Top = 184 end object CompanyDataSource: TDataSource DataSet = CompanyTable Left = 16 Top = 216 end object PlacementInfo: TFormPlacement IniFileName = 'PCGamer_Lx1' IniSection = 'FormCompany' UseRegistry = True Left = 16 Top = 248 end end