object pHONEDLG: TpHONEDLG
  Left = 236
  Top = 53
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Locate Area Code '
  ClientHeight = 318
  ClientWidth = 269
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDeactivate = FormDeactivate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel2: TPanel
    Left = 0
    Top = 288
    Width = 269
    Height = 30
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    object Button1: TButton
      Left = 12
      Top = 4
      Width = 60
      Height = 24
      Caption = '&Find'
      Default = True
      TabOrder = 0
      OnClick = Button1Click
    end
    object btgoto: TButton
      Left = 76
      Top = 4
      Width = 60
      Height = 24
      Caption = '&Goto'
      TabOrder = 1
      OnClick = btgotoClick
    end
    object Button2: TButton
      Left = 140
      Top = 4
      Width = 60
      Height = 24
      Caption = '&Cancel'
      TabOrder = 2
      OnClick = Button2Click
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 269
    Height = 288
    Align = alClient
    TabOrder = 1
    object Bevel1: TBevel
      Left = 12
      Top = 8
      Width = 245
      Height = 57
      Shape = bsFrame
    end
    object Label14: TLabel
      Left = 28
      Top = 20
      Width = 53
      Height = 13
      Caption = '&Area Code:'
      FocusControl = Edit1
    end
    object Label15: TLabel
      Left = 104
      Top = 20
      Width = 51
      Height = 13
      Caption = '&Exchange:'
      FocusControl = Edit2
    end
    object Label1: TLabel
      Left = 180
      Top = 20
      Width = 30
      Height = 13
      Caption = '&Zoom:'
    end
    object Label2: TLabel
      Left = 16
      Top = 268
      Width = 157
      Height = 13
      Caption = 'Note: * Indicates New Area Code'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 28
      Top = 36
      Width = 37
      Height = 21
      MaxLength = 3
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 104
      Top = 36
      Width = 33
      Height = 21
      MaxLength = 3
      TabOrder = 1
    end
    object cb1: TComboBox
      Left = 180
      Top = 36
      Width = 45
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        '0.1'
        '0.5'
        '1'
        '2'
        '5'
        '10')
      TabOrder = 2
    end
    object pn1: TPanel
      Left = 12
      Top = 80
      Width = 245
      Height = 185
      Caption = 'pn1'
      TabOrder = 3
      object Header1: THeader
        Left = 4
        Top = 4
        Width = 237
        Height = 21
        Sections.Sections = (
          #0'30'#0'Exc'
          #0'30'#0'City'
          #0'39'#0'State'
          #0'27'#0'Zip')
        TabOrder = 0
        OnSizing = Header1Sizing
      end
      object Lb1: TListBox
        Left = 4
        Top = 24
        Width = 237
        Height = 133
        Ctl3D = False
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemHeight = 16
        ParentCtl3D = False
        ParentFont = False
        Style = lbOwnerDrawFixed
        TabOrder = 2
        OnClick = Lb1Click
        OnDblClick = Lb1DblClick
        OnDrawItem = Lb1DrawItem
        OnMeasureItem = Lb1MeasureItem
      end
      object Panel1: TPanel
        Left = 1
        Top = 156
        Width = 243
        Height = 28
        Align = alBottom
        Alignment = taLeftJustify
        BevelInner = bvLowered
        BevelOuter = bvNone
        BorderWidth = 3
        TabOrder = 1
      end
    end
  end
end