home *** CD-ROM | disk | FTP | other *** search
- object fmFindCust: TfmFindCust
- Left = 210
- Top = 116
- BorderStyle = bsDialog
- Caption = 'Locate Customer'
- ClientHeight = 223
- ClientWidth = 329
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 4
- Top = 4
- Width = 237
- Height = 80
- Shape = bsFrame
- end
- object Label1: TLabel
- Left = 40
- Top = 16
- Width = 22
- Height = 17
- Caption = '&Field'
- FocusControl = ComboBox1
- end
- object Label2: TLabel
- Left = 35
- Top = 63
- Width = 27
- Height = 13
- Caption = '&Value'
- FocusControl = Edit1
- end
- object DBGrid1: TDBGrid
- Left = 4
- Top = 93
- Width = 320
- Height = 127
- DataSource = DM2.CustLookupSource
- Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
- TabOrder = 5
- TitleFont.Color = clWindowText
- TitleFont.Height = -11
- TitleFont.Name = 'MS Sans Serif'
- TitleFont.Style = []
- end
- object ComboBox1: TComboBox
- Left = 67
- Top = 12
- Width = 166
- Height = 20
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- 'Company'
- 'CustNo'
- 'Addr1'
- 'Addr2'
- 'City'
- 'State'
- 'Zip'
- 'Country'
- 'Phone'
- 'FAX'
- 'TaxRate'
- 'Contact'
- 'LastInvoiceDate')
- TabOrder = 0
- OnChange = ComboBox1Change
- end
- object Edit1: TEdit
- Left = 67
- Top = 59
- Width = 166
- Height = 20
- TabOrder = 2
- OnChange = Edit1Change
- end
- object cbUseFilter: TCheckBox
- Left = 16
- Top = 37
- Width = 64
- Height = 17
- Alignment = taLeftJustify
- Caption = 'Use Filter'
- State = cbChecked
- TabOrder = 1
- end
- object Button1: TButton
- Left = 249
- Top = 6
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 3
- end
- object Button2: TButton
- Left = 249
- Top = 37
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 4
- end
- end
-