object fmFindCust: TfmFindCust Left = 232 Top = 118 BorderStyle = bsDialog Caption = 'Locate Customer' ClientHeight = 228 ClientWidth = 375 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 4 Top = 4 Width = 285 Height = 61 Shape = bsFrame end object Label1: TLabel Left = 88 Top = 28 Width = 22 Height = 17 Caption = '&Field' FocusControl = ComboBox1 end object DBGrid1: TDBGrid Left = 4 Top = 85 Width = 365 Height = 127 DataSource = DM2.CustLookupSource Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit] TabOrder = 4 TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] end object ComboBox1: TComboBox Left = 115 Top = 24 Width = 166 Height = 21 ItemHeight = 13 Items.Strings = ( 'Company' 'CustNo' 'Addr1' 'Addr2' 'City' 'State' 'Zip' 'Country' 'Phone' 'FAX' 'TaxRate' 'Contact' 'LastInvoiceDate') TabOrder = 1 Text = 'Company' OnChange = ComboBox1Change end object BitBtn2: TBitBtn Left = 10 Top = 23 Width = 72 Height = 25 Caption = 'Find' TabOrder = 0 OnClick = BitBtn2Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333FF33333333333330003FF3FFFFF3333777003000003333 300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333 330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000 333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000 339977FF777777773377000BFB03333333337773FF733333333F333000333333 3300333777333333337733333333333333003333333333333377333333333333 333333333333333333FF33333333333330003333333333333777333333333333 3000333333333333377733333333333333333333333333333333} NumGlyphs = 2 end object Button1: TButton Left = 296 Top = 8 Width = 75 Height = 25 Caption = 'OK' ModalResult = 1 TabOrder = 2 end object Button2: TButton Left = 296 Top = 40 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 3 end object AutoFind1: TAutoFind Active = False DataSet = DM2.CustLookup DataField = 'Company' Left = 224 Top = 32 end end