?? config.dfm
字號:
object ConfigForm: TConfigForm
Left = 262
Top = 164
BorderStyle = bsToolWindow
Caption = '有關設置'
ClientHeight = 313
ClientWidth = 298
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
PixelsPerInch = 96
TextHeight = 12
object SpeedButton1: TSpeedButton
Left = 224
Top = 288
Width = 65
Height = 20
Caption = '關閉'
OnClick = SpeedButton1Click
end
object ConfigPageCtrl: TPageControl
Left = 0
Top = 0
Width = 298
Height = 281
ActivePage = AdvanceTabSheet
Align = alTop
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 = 167
ActivePage = Mp3FilterTabSheet
TabOrder = 2
TabPosition = tpBottom
OnChange = FilterPageCtrlChange
object DestTabSheet: TTabSheet
Caption = '要查找的文件'
object DestListBox: TListBox
Left = 0
Top = 0
Width = 268
Height = 140
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 = 140
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 = 140
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 Bevel4: TBevel
Left = 16
Top = 120
Width = 257
Height = 41
Shape = bsFrame
end
object Bevel2: TBevel
Left = 16
Top = 174
Width = 257
Height = 67
Shape = bsFrame
end
object Label2: TLabel
Left = 24
Top = 135
Width = 144
Height = 12
Caption = '自動搜索時的并發線程數：'
end
object Label3: TLabel
Left = 31
Top = 191
Width = 60
Height = 12
Caption = '超時設置：'
end
object Label4: TLabel
Left = 176
Top = 191
Width = 24
Height = 12
Caption = '分鐘'
end
object Label5: TLabel
Left = 24
Top = 215
Width = 216
Height = 12
Caption = '（若超過指定時間，將自動搜索下一組）'
end
object RadioGroup1: TRadioGroup
Left = 16
Top = 8
Width = 257
Height = 105
Caption = '搜索設置'
Items.Strings = (
'自動搜索第一級目錄'
'只搜索到共享文件夾'
'遞歸搜索所有目錄')
TabOrder = 0
OnClick = RadioGroup1Click
end
object SpinEdit1: TSpinEdit
Left = 192
Top = 130
Width = 65
Height = 21
MaxValue = 0
MinValue = 0
TabOrder = 1
Value = 3
OnChange = SpinEdit1Change
end
object SpinEdit2: TSpinEdit
Left = 99
Top = 185
Width = 65
Height = 21
MaxValue = 100
MinValue = 1
TabOrder = 2
Value = 5
end
end
object UserTabSheet: TTabSheet
Caption = '用戶名和密碼'
ImageIndex = 2
object Label6: TLabel
Left = 10
Top = 84
Width = 144
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 = 118
Height = 20
Color = clMenu
Enabled = False
TabOrder = 0
Text = 'guest'
end
object edtDftPass: TEdit
Left = 59
Top = 43
Width = 118
Height = 20
Color = clMenu
Enabled = False
TabOrder = 1
end
object btnChangeDft: TButton
Left = 184
Top = 20
Width = 75
Height = 20
Caption = '修改'
TabOrder = 2
OnClick = btnChangeDftClick
end
object btnSaveDft: TButton
Left = 184
Top = 44
Width = 75
Height = 20
Caption = '確定'
TabOrder = 3
OnClick = btnSaveDftClick
end
end
object lvMountList: TListView
Left = 7
Top = 101
Width = 274
Height = 93
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
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
end
object AdvanceTabSheet: TTabSheet
Caption = '高級'
ImageIndex = 3
object cbNoPass: TCheckBox
Left = 8
Top = 8
Width = 233
Height = 17
Caption = '訪問未設置密碼的主機的默認共享'
Checked = True
State = cbChecked
TabOrder = 0
end
end
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -