379 lines
7.9 KiB
Plaintext
379 lines
7.9 KiB
Plaintext
object FileSearchForm: TFileSearchForm
|
|
Left = 267
|
|
Top = 302
|
|
Width = 787
|
|
Height = 509
|
|
VertScrollBar.Range = 252
|
|
HorzScrollBar.Range = 378
|
|
ActiveControl = StartBtn
|
|
AutoScroll = False
|
|
Caption = 'File Search Demo (TJclFileEnumerator)'
|
|
Color = clButton
|
|
Constraints.MinHeight = 279
|
|
Constraints.MinWidth = 647
|
|
Font.Color = clBlack
|
|
Font.Height = 12
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Pitch = fpVariable
|
|
Font.Style = []
|
|
Font.Weight = 40
|
|
ParentFont = False
|
|
Position = poDefaultPosOnly
|
|
Scaled = False
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
PixelsPerInch = 96
|
|
object StatusBar: TStatusBar
|
|
Left = 0
|
|
Top = 488
|
|
Width = 787
|
|
Height = 21
|
|
Panels = <
|
|
item
|
|
Alignment = taRightJustify
|
|
Width = 100
|
|
end
|
|
item
|
|
Alignment = taRightJustify
|
|
Width = 100
|
|
end
|
|
item
|
|
end>
|
|
end
|
|
object FileList: TListView
|
|
Left = 0
|
|
Top = 181
|
|
Width = 787
|
|
Height = 307
|
|
Align = alClient
|
|
Columns = <
|
|
item
|
|
Caption = 'File'
|
|
Tag = 0
|
|
Width = 360
|
|
end
|
|
item
|
|
Alignment = taRightJustify
|
|
AutoSize = True
|
|
Caption = 'Size'
|
|
Tag = 0
|
|
Width = 50
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
AutoSize = True
|
|
Caption = 'Time'
|
|
Tag = 0
|
|
Width = 50
|
|
end
|
|
item
|
|
Caption = 'Attr.'
|
|
Tag = 0
|
|
Width = 60
|
|
end
|
|
item
|
|
Caption = 'Owner'
|
|
Tag = 0
|
|
Width = 100
|
|
end
|
|
item
|
|
Caption = 'Group'
|
|
Tag = 0
|
|
Width = 50
|
|
end>
|
|
ReadOnly = True
|
|
ShowColumnSortIndicators = True
|
|
Sorted = True
|
|
TabOrder = 1
|
|
ViewStyle = vsReport
|
|
OnColumnClick = FileListColumnClick
|
|
end
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 787
|
|
Height = 49
|
|
Align = alTop
|
|
BevelOuter = bvNone
|
|
TabOrder = 2
|
|
object Label1: TLabel
|
|
Left = 14
|
|
Top = 14
|
|
Width = 16
|
|
Height = 13
|
|
Caption = 'List'
|
|
end
|
|
object Label2: TLabel
|
|
Left = 216
|
|
Top = 14
|
|
Width = 29
|
|
Height = 13
|
|
Caption = 'files in'
|
|
end
|
|
object RootDirInput: TEdit
|
|
Left = 256
|
|
Top = 10
|
|
Width = 248
|
|
Height = 21
|
|
TabOrder = 1
|
|
end
|
|
object StartBtn: TButton
|
|
Left = 524
|
|
Top = 10
|
|
Width = 47
|
|
Height = 25
|
|
Caption = 'Start'
|
|
TabOrder = 2
|
|
OnClick = StartBtnClick
|
|
end
|
|
object StopBtn: TButton
|
|
Left = 576
|
|
Top = 10
|
|
Width = 47
|
|
Height = 25
|
|
Caption = 'Stop'
|
|
Enabled = False
|
|
TabOrder = 3
|
|
OnClick = StopBtnClick
|
|
end
|
|
object DetailsBtn: TButton
|
|
Left = 692
|
|
Top = 10
|
|
Width = 77
|
|
Height = 25
|
|
Caption = 'More >>'
|
|
TabOrder = 5
|
|
OnClick = DetailsBtnClick
|
|
end
|
|
object FileMaskInput: TEdit
|
|
Left = 40
|
|
Top = 10
|
|
Width = 169
|
|
Height = 21
|
|
TabOrder = 0
|
|
Text = '*'
|
|
end
|
|
object SaveBtn: TButton
|
|
Left = 628
|
|
Top = 10
|
|
Width = 47
|
|
Height = 25
|
|
Caption = 'Save...'
|
|
Enabled = False
|
|
TabOrder = 4
|
|
OnClick = SaveBtnClick
|
|
end
|
|
end
|
|
object DetailsPanel: TPanel
|
|
Left = 0
|
|
Top = 49
|
|
Width = 787
|
|
Height = 132
|
|
Align = alTop
|
|
BevelOuter = bvNone
|
|
TabOrder = 3
|
|
Visible = False
|
|
object GroupBox1: TGroupBox
|
|
Left = 256
|
|
Top = 0
|
|
Width = 249
|
|
Height = 121
|
|
Caption = 'File attributes'
|
|
TabOrder = 0
|
|
object cbReadOnly: TCheckBox
|
|
Tag = 1
|
|
Left = 16
|
|
Top = 16
|
|
Width = 89
|
|
Height = 21
|
|
AllowGrayed = True
|
|
Caption = 'Read only'
|
|
Checked = True
|
|
State = cbGrayed
|
|
TabOrder = 0
|
|
OnClick = cbFileAttributeClick
|
|
end
|
|
object cbHidden: TCheckBox
|
|
Tag = 2
|
|
Left = 16
|
|
Top = 40
|
|
Width = 89
|
|
Height = 21
|
|
AllowGrayed = True
|
|
Caption = 'Hidden'
|
|
TabOrder = 1
|
|
OnClick = cbFileAttributeClick
|
|
end
|
|
object cbSystem: TCheckBox
|
|
Tag = 4
|
|
Left = 16
|
|
Top = 64
|
|
Width = 89
|
|
Height = 21
|
|
AllowGrayed = True
|
|
Caption = 'System'
|
|
TabOrder = 2
|
|
OnClick = cbFileAttributeClick
|
|
end
|
|
object cbDirectory: TCheckBox
|
|
Tag = 16
|
|
Left = 16
|
|
Top = 88
|
|
Width = 89
|
|
Height = 21
|
|
AllowGrayed = True
|
|
Caption = 'Directory'
|
|
TabOrder = 3
|
|
OnClick = cbFileAttributeClick
|
|
end
|
|
object cbSymLink: TCheckBox
|
|
Tag = 64
|
|
Left = 136
|
|
Top = 16
|
|
Width = 101
|
|
Height = 21
|
|
AllowGrayed = True
|
|
Caption = 'Symbolic link'
|
|
Checked = True
|
|
State = cbGrayed
|
|
TabOrder = 4
|
|
OnClick = cbFileAttributeClick
|
|
end
|
|
object cbNormal: TCheckBox
|
|
Tag = 128
|
|
Left = 136
|
|
Top = 88
|
|
Width = 89
|
|
Height = 21
|
|
AllowGrayed = True
|
|
Caption = 'Normal'
|
|
Checked = True
|
|
State = cbGrayed
|
|
TabOrder = 6
|
|
OnClick = cbFileAttributeClick
|
|
end
|
|
object cbArchive: TCheckBox
|
|
Tag = 32
|
|
Left = 136
|
|
Top = 16
|
|
Width = 89
|
|
Height = 21
|
|
AllowGrayed = True
|
|
Caption = 'Archive'
|
|
Checked = True
|
|
State = cbGrayed
|
|
TabOrder = 5
|
|
OnClick = cbFileAttributeClick
|
|
end
|
|
end
|
|
object cbLastChangeAfter: TCheckBox
|
|
Left = 524
|
|
Top = 12
|
|
Width = 131
|
|
Height = 30
|
|
Caption = 'Last change after'
|
|
TabOrder = 1
|
|
end
|
|
object edLastChangeAfter: TEdit
|
|
Left = 656
|
|
Top = 16
|
|
Width = 113
|
|
Height = 21
|
|
MaxLength = 10
|
|
TabOrder = 2
|
|
end
|
|
object cbLastChangeBefore: TCheckBox
|
|
Left = 524
|
|
Top = 36
|
|
Width = 131
|
|
Height = 30
|
|
Caption = 'Last change before'
|
|
TabOrder = 3
|
|
end
|
|
object edLastChangeBefore: TEdit
|
|
Left = 656
|
|
Top = 40
|
|
Width = 113
|
|
Height = 21
|
|
MaxLength = 10
|
|
TabOrder = 4
|
|
end
|
|
object cbFileSizeMax: TCheckBox
|
|
Left = 524
|
|
Top = 60
|
|
Width = 131
|
|
Height = 30
|
|
Caption = 'Maximum size'
|
|
TabOrder = 5
|
|
end
|
|
object edFileSizeMax: TEdit
|
|
Left = 656
|
|
Top = 64
|
|
Width = 113
|
|
Height = 21
|
|
TabOrder = 6
|
|
Text = '$7FFFFFFFFFFFFFFF'
|
|
end
|
|
object cbFileSizeMin: TCheckBox
|
|
Left = 524
|
|
Top = 84
|
|
Width = 131
|
|
Height = 30
|
|
Caption = 'Minimum size'
|
|
TabOrder = 7
|
|
end
|
|
object edFileSizeMin: TEdit
|
|
Left = 656
|
|
Top = 88
|
|
Width = 113
|
|
Height = 21
|
|
TabOrder = 8
|
|
Text = '0'
|
|
end
|
|
object IncludeSubDirectories: TCheckBox
|
|
Left = 40
|
|
Top = 18
|
|
Width = 157
|
|
Height = 17
|
|
Caption = 'Include sub directories'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 9
|
|
OnClick = UpdateIncludeHiddenSubDirs
|
|
end
|
|
object IncludeHiddenSubDirs: TCheckBox
|
|
Left = 40
|
|
Top = 42
|
|
Width = 201
|
|
Height = 17
|
|
Caption = 'Include hidden sub directories'
|
|
TabOrder = 10
|
|
OnClick = IncludeHiddenSubDirsClick
|
|
end
|
|
object cbDisplayLiveUpdate: TCheckBox
|
|
Left = 40
|
|
Top = 90
|
|
Width = 189
|
|
Height = 17
|
|
Caption = '&Display live update'
|
|
TabOrder = 12
|
|
end
|
|
object cbCaseInsensitiveSearch: TCheckBox
|
|
Left = 40
|
|
Top = 66
|
|
Width = 177
|
|
Height = 17
|
|
Caption = 'Case insensitive search'
|
|
TabOrder = 11
|
|
end
|
|
end
|
|
object SaveDialog: TSaveDialog
|
|
FilterIndex = 0
|
|
Height = 0
|
|
Title = 'Save'
|
|
Width = 0
|
|
Left = 740
|
|
Top = 36
|
|
end
|
|
end
|