object PDlg: TPDlg
  Left = 76
  Top = 141
  BorderStyle = bsNone
  ClientHeight = 190
  ClientWidth = 311
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poDefault
  PixelsPerInch = 96
  TextHeight = 13
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 311
    Height = 190
    Align = alClient
    BorderWidth = 2
    TabOrder = 0
    object Label8: TLabel
      Left = 3
      Top = 3
      Width = 305
      Height = 16
      Align = alTop
      AutoSize = False
      Caption = ' Select New Data Path'
      Color = clNavy
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clYellow
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Panel3: TPanel
      Left = 3
      Top = 45
      Width = 305
      Height = 112
      Align = alClient
      BevelOuter = bvNone
      BorderWidth = 4
      Caption = 'Panel3'
      TabOrder = 0
      object dlb1: TDirectoryListBox
        Left = 4
        Top = 4
        Width = 297
        Height = 104
        Align = alClient
        Columns = 3
        DirLabel = Label12
        ItemHeight = 16
        TabOrder = 0
      end
    end
    object Panel4: TPanel
      Left = 3
      Top = 157
      Width = 305
      Height = 30
      Align = alBottom
      BevelOuter = bvNone
      TabOrder = 1
      object Label12: TLabel
        Left = 8
        Top = 0
        Width = 75
        Height = 13
        Caption = 'D:\mapctrls\pro'
      end
      object Panel6: TPanel
        Left = 188
        Top = 0
        Width = 117
        Height = 30
        Align = alRight
        BevelOuter = bvNone
        TabOrder = 0
        object Button3: TButton
          Left = 0
          Top = 2
          Width = 57
          Height = 25
          Caption = '&Set Path'
          TabOrder = 0
          OnClick = Button3Click
        end
        object Button1: TButton
          Left = 64
          Top = 2
          Width = 49
          Height = 25
          Caption = '&Cancel'
          TabOrder = 1
          OnClick = Button1Click
        end
      end
    end
    object Panel5: TPanel
      Left = 3
      Top = 19
      Width = 305
      Height = 26
      Align = alTop
      BevelOuter = bvNone
      Caption = 'Panel5'
      TabOrder = 2
      object Label10: TLabel
        Left = 8
        Top = 4
        Width = 39
        Height = 13
        Caption = 'Look In:'
      end
      object Dvcb1: TDriveComboBox
        Left = 56
        Top = 4
        Width = 157
        Height = 19
        Ctl3D = False
        DirList = dlb1
        ParentCtl3D = False
        TabOrder = 0
      end
    end
  end
end