config.dfm

最好的局域网搜索软件

object ConfigForm: TConfigForm
  Left = 262
  Top = 164
  BorderStyle = bsToolWindow
  Caption = '有关设置'
  ClientHeight = 334
  ClientWidth = 299
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object SpeedButton1: TSpeedButton
    Left = 230
    Top = 310
    Width = 65
    Height = 20
    Anchors = [akRight, akBottom]
    Caption = '关闭'
    OnClick = SpeedButton1Click
  end
  object ConfigPageCtrl: TPageControl
    Left = 0
    Top = 0
    Width = 299
    Height = 303
    ActivePage = UserTabSheet
    Align = alTop
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    object FilterTabSheet: TTabSheet
      Caption = '文件过滤'
      object BtnAddFilter: TSpeedButton
        Left = 171
        Top = 52
        Width = 49
        Height = 22
        Caption = '添加'
        OnClick = BtnAddFilterClick
      end
      object Label1: TLabel
        Left = 6
        Top = 6
        Width = 180
        Height = 12
        Caption = '要查找的文件名中包含如下文字：'
      end
      object BtnDelFilter: TSpeedButton
        Left = 227
        Top = 52
        Width = 49
        Height = 22
        Caption = '删除'
        OnClick = BtnDelFilterClick
      end
      object EditFilter: TEdit
        Left = 5
        Top = 26
        Width = 273
        Height = 20
        TabOrder = 0
      end
      object CheckBox1: TCheckBox
        Left = 6
        Top = 54
        Width = 97
        Height = 17
        Caption = '搜索已有文件'
        TabOrder = 1
      end
      object FilterPageCtrl: TPageControl
        Left = 6
        Top = 80
        Width = 276
        Height = 193
        ActivePage = DestTabSheet
        Anchors = [akLeft, akTop, akRight, akBottom]
        TabOrder = 2
        TabPosition = tpBottom
        OnChange = FilterPageCtrlChange
        object DestTabSheet: TTabSheet
          Caption = '要查找的文件'
          object DestListBox: TListBox
            Left = 0
            Top = 0
            Width = 268
            Height = 166
            Align = alClient
            ItemHeight = 12
            TabOrder = 0
          end
        end
        object Mp3FilterTabSheet: TTabSheet
          Caption = 'MP3'
          ImageIndex = 1
          object Mp3ListBox: TListBox
            Left = 0
            Top = 0
            Width = 268
            Height = 166
            Align = alClient
            ItemHeight = 12
            Items.Strings = (
              'mp3'
              '.ra'
              '.ram'
              'song'
              '.lrc'
              '歌'
              '音乐')
            TabOrder = 0
          end
        end
        object MovieDestTabSheet: TTabSheet
          Caption = 'Movie'
          ImageIndex = 2
          object MovieListBox: TListBox
            Left = 0
            Top = 0
            Width = 268
            Height = 166
            Align = alClient
            ItemHeight = 12
            Items.Strings = (
              '.mpg'
              '.mpeg'
              '.rm'
              '.swf'
              '.dat'
              '.avi'
              '.asx'
              '电影'
              'movie')
            TabOrder = 0
          end
        end
      end
    end
    object ConfigTabSheet: TTabSheet
      Caption = '自动搜索'
      ImageIndex = 1
      object Bevel2: TBevel
        Left = 16
        Top = 125
        Width = 257
        Height = 12
        Shape = bsTopLine
      end
      object Label2: TLabel
        Left = 16
        Top = 138
        Width = 144
        Height = 12
        Caption = '自动搜索时的并发线程数：'
      end
      object Label3: TLabel
        Left = 15
        Top = 182
        Width = 60
        Height = 12
        Caption = '超时设置：'
      end
      object Label4: TLabel
        Left = 128
        Top = 182
        Width = 24
        Height = 12
        Caption = '分钟'
      end
      object Label5: TLabel
        Left = 155
        Top = 182
        Width = 132
        Height = 12
        Caption = '（若超时将搜索下一组）'
      end
      object Bevel1: TBevel
        Left = 15
        Top = 164
        Width = 257
        Height = 12
        Shape = bsTopLine
      end
      object RadioGroup1: TRadioGroup
        Left = 16
        Top = 8
        Width = 257
        Height = 89
        Caption = '搜索设置（共享）'
        Items.Strings = (
          '自动搜索第一级目录'
          '只搜索到共享文件夹'
          '递归搜索所有目录')
        TabOrder = 0
        OnClick = RadioGroup1Click
      end
      object SpinEdit1: TSpinEdit
        Left = 176
        Top = 132
        Width = 65
        Height = 21
        MaxValue = 0
        MinValue = 0
        TabOrder = 1
        Value = 3
        OnChange = SpinEdit1Change
      end
      object SpinEdit2: TSpinEdit
        Left = 75
        Top = 176
        Width = 46
        Height = 21
        MaxValue = 100
        MinValue = 1
        TabOrder = 2
        Value = 5
      end
      object cbFtpRecursive: TCheckBox
        Left = 16
        Top = 104
        Width = 209
        Height = 17
        Caption = '递归搜索FTP的所有目录'
        TabOrder = 3
      end
    end
    object UserTabSheet: TTabSheet
      Caption = '共享登录'
      ImageIndex = 2
      object Label6: TLabel
        Left = 10
        Top = 84
        Width = 108
        Height = 12
        Caption = '下列主机单独设置：'
      end
      object GroupBox1: TGroupBox
        Left = 8
        Top = 7
        Width = 273
        Height = 70
        Caption = '需要登录时默认的用户名和密码：'
        TabOrder = 0
        object Label7: TLabel
          Left = 8
          Top = 24
          Width = 48
          Height = 12
          Caption = '用户名：'
        end
        object Label8: TLabel
          Left = 8
          Top = 48
          Width = 48
          Height = 12
          Caption = '密  码：'
        end
        object edtDftUser: TEdit
          Left = 59
          Top = 19
          Width = 142
          Height = 20
          Color = clMenu
          Enabled = False
          TabOrder = 0
          Text = 'guest'
        end
        object edtDftPass: TEdit
          Left = 59
          Top = 43
          Width = 142
          Height = 20
          Color = clMenu
          Enabled = False
          TabOrder = 1
        end
        object btnChangeDft: TButton
          Left = 208
          Top = 20
          Width = 51
          Height = 20
          Caption = '修改'
          TabOrder = 2
          OnClick = btnChangeDftClick
        end
        object btnSaveDft: TButton
          Left = 208
          Top = 44
          Width = 51
          Height = 20
          Caption = '确定'
          TabOrder = 3
          OnClick = btnSaveDftClick
        end
      end
      object lvMountList: TListView
        Left = 7
        Top = 100
        Width = 274
        Height = 95
        Columns = <
          item
            Caption = '主机名'
            Width = 90
          end
          item
            Caption = '用户名'
            Width = 90
          end
          item
            Caption = '密码'
            Width = 90
          end>
        GridLines = True
        ReadOnly = True
        RowSelect = True
        TabOrder = 1
        ViewStyle = vsReport
      end
      object edtHost: TEdit
        Left = 7
        Top = 199
        Width = 91
        Height = 20
        TabOrder = 2
      end
      object edtUser: TEdit
        Left = 100
        Top = 199
        Width = 89
        Height = 20
        TabOrder = 3
      end
      object edtPass: TEdit
        Left = 191
        Top = 199
        Width = 90
        Height = 20
        PasswordChar = '*'
        TabOrder = 4
      end
      object btnSave: TButton
        Left = 224
        Top = 226
        Width = 57
        Height = 20
        Caption = '确定修改'
        TabOrder = 5
        OnClick = btnSaveClick
      end
      object btnChange: TButton
        Left = 151
        Top = 226
        Width = 57
        Height = 20
        Caption = '修改'
        TabOrder = 6
        OnClick = btnChangeClick
      end
      object btnDelete: TButton
        Left = 79
        Top = 226
        Width = 57
        Height = 20
        Caption = '删除'
        TabOrder = 7
        OnClick = btnDeleteClick
      end
      object btnAdd: TButton
        Left = 7
        Top = 226
        Width = 57
        Height = 20
        Caption = '添加'
        TabOrder = 8
        OnClick = btnAddClick
      end
      object cbNoPass: TCheckBox
        Left = 8
        Top = 254
        Width = 233
        Height = 17
        Caption = '访问未设置密码的主机的默认共享'
        Checked = True
        State = cbChecked
        TabOrder = 9
      end
    end
    object FtpTabSheet: TTabSheet
      Caption = 'FTP登录'
      ImageIndex = 3
      object Label11: TLabel
        Left = 10
        Top = 84
        Width = 108
        Height = 12
        Caption = '下列主机单独设置：'
      end
      object GroupBox2: TGroupBox
        Left = 8
        Top = 7
        Width = 273
        Height = 70
        Caption = '需要登录时默认的用户名和密码：'
        TabOrder = 0
        object Label9: TLabel
          Left = 8
          Top = 24
          Width = 48
          Height = 12
          Caption = '用户名：'
        end
        object Label10: TLabel
          Left = 8
          Top = 48
          Width = 48
          Height = 12
          Caption = '密  码：'
        end
        object edtFtpUsr: TEdit
          Left = 59
          Top = 19
          Width = 142
          Height = 20
          Color = clMenu
          Enabled = False
          TabOrder = 0
          Text = 'anonymous'
        end
        object edtFtpPass: TEdit
          Left = 59
          Top = 43
          Width = 142
          Height = 20
          Color = clMenu
          Enabled = False
          TabOrder = 1
          Text = '[e-mail]'
        end
        object btnChangeFtp: TButton
          Left = 208
          Top = 20
          Width = 51
          Height = 20
          Caption = '修改'
          TabOrder = 2
          OnClick = btnChangeFtpClick
        end
        object btnSaveFtp: TButton
          Left = 208
          Top = 44
          Width = 51
          Height = 20
          Caption = '确定'
          TabOrder = 3
          OnClick = btnSaveFtpClick
        end
      end
      object lvFtpMountList: TListView
        Left = 7
        Top = 100
        Width = 274
        Height = 95
        Columns = <
          item
            Caption = '主机名'
            Width = 90
          end
          item
            Caption = '用户名'
            Width = 90
          end
          item
            Caption = '密码'
            Width = 90
          end>
        GridLines = True
        ReadOnly = True
        RowSelect = True
        TabOrder = 1
        ViewStyle = vsReport
      end
      object edtFtpHost: TEdit
        Left = 7
        Top = 199
        Width = 91
        Height = 20
        TabOrder = 2
      end
      object edtFtpUser: TEdit
        Left = 100
        Top = 199
        Width = 89
        Height = 20
        TabOrder = 3
      end
      object edtPassFtp: TEdit
        Left = 191
        Top = 199
        Width = 90
        Height = 20
        PasswordChar = '*'
        TabOrder = 4
      end
      object btnFtpSave: TButton
        Left = 224
        Top = 226
        Width = 57
        Height = 20
        Caption = '确定修改'
        TabOrder = 5
        OnClick = btnFtpSaveClick
      end
      object btnFtpChange: TButton
        Left = 151
        Top = 226
        Width = 57
        Height = 20
        Caption = '修改'
        TabOrder = 6
        OnClick = btnFtpChangeClick
      end
      object btnFtpDelete: TButton
        Left = 79
        Top = 226
        Width = 57
        Height = 20
        Caption = '删除'
        TabOrder = 7
        OnClick = btnFtpDeleteClick
      end
      object btnFtpAdd: TButton
        Left = 7
        Top = 226
        Width = 57
        Height = 20
        Caption = '添加'
        TabOrder = 8
        OnClick = btnFtpAddClick
      end
    end
  end
end