home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2005 July
/
CHIP_CD_2005-07.iso
/
software
/
rapid
/
rapid_install.exe
/
rapid.exe
/
0
/
RCDATA
/
TFORMANALYZE
/
TFORMANALYZE.txt
Wrap
Text File
|
2005-05-02
|
6KB
|
273 lines
object formAnalyze: TformAnalyze
Left = 519
Top = 272
Width = 432
Height = 461
ActiveControl = btnAnalyze
Caption = 'Analyze disk'
Color = clBtnFace
Constraints.MinHeight = 320
Constraints.MinWidth = 350
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
DesignSize = (
424
427)
PixelsPerInch = 96
TextHeight = 13
object btnCancel: TButton
Left = 304
Top = 398
Width = 115
Height = 25
Anchors = [akRight, akBottom]
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 2
end
object btnDefragment: TButton
Left = 184
Top = 398
Width = 115
Height = 25
Action = actDefragment
Anchors = [akRight, akBottom]
ModalResult = 1
TabOrder = 1
end
object gbWorkspace: TGroupBox
Left = 8
Top = 8
Width = 409
Height = 383
Anchors = [akLeft, akTop, akRight, akBottom]
Caption = ' Parameters '
TabOrder = 0
DesignSize = (
409
383)
object lblStatus: TLabel
Left = 8
Top = 366
Width = 57
Height = 13
Anchors = [akLeft, akBottom]
AutoSize = False
Caption = 'Status:'
end
object lblStatusValue: TLabel
Left = 64
Top = 366
Width = 337
Height = 13
Anchors = [akLeft, akBottom]
AutoSize = False
Caption = 'Not started'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object lblFound: TLabel
Left = 8
Top = 350
Width = 33
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'Found:'
end
object lblFoundValue: TLabel
Left = 64
Top = 350
Width = 9
Height = 13
Anchors = [akLeft, akBottom]
Caption = '--'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object lblDisk: TLabel
Left = 8
Top = 24
Width = 25
Height = 13
Caption = 'Path:'
end
object lblFragments: TLabel
Left = 8
Top = 64
Width = 101
Height = 13
Caption = 'Number of fragments:'
end
object Bevel1: TBevel
Left = 8
Top = 112
Width = 393
Height = 2
Anchors = [akLeft, akTop, akRight]
end
object lvFiles: TListView
Left = 8
Top = 152
Width = 393
Height = 191
Anchors = [akLeft, akTop, akRight, akBottom]
Checkboxes = True
Columns = <
item
Caption = 'File'
Width = 270
end
item
Caption = 'Fragments'
Width = 100
end>
MultiSelect = True
OwnerData = True
ReadOnly = True
RowSelect = True
PopupMenu = popupContextMenu
StateImages = ImageList1
TabOrder = 5
ViewStyle = vsReport
OnColumnClick = lvFilesColumnClick
OnData = lvFilesData
OnKeyDown = lvFilesKeyDown
OnMouseDown = lvFilesMouseDown
end
object aniFind: TAnimate
Left = 168
Top = 195
Width = 80
Height = 50
Color = clWhite
CommonAVI = aviFindFolder
ParentColor = False
StopFrame = 29
Visible = False
end
object btnStop: TButton
Left = 296
Top = 120
Width = 99
Height = 25
Action = actStop
Anchors = [akTop, akRight]
TabOrder = 4
end
object btnAnalyze: TButton
Left = 192
Top = 120
Width = 99
Height = 25
Action = actAnalyze
Anchors = [akTop, akRight]
TabOrder = 3
end
object edtPath: TEdit
Left = 8
Top = 40
Width = 375
Height = 21
Anchors = [akLeft, akTop, akRight]
TabOrder = 0
Text = 'C:\'
end
object seMinFragments: TSpinEdit
Left = 8
Top = 80
Width = 105
Height = 22
MaxValue = 99999
MinValue = 2
TabOrder = 2
Value = 30
end
object btnSelect: TButton
Left = 384
Top = 40
Width = 17
Height = 23
Action = actSelectDir
Anchors = [akTop, akRight]
Caption = '...'
TabOrder = 1
end
end
object ActionManager1: TActionManager
Left = 8
Top = 392
StyleName = 'XP Style'
object actAnalyze: TAction
Caption = 'Analyze'
OnExecute = actAnalyzeExecute
end
object actDefragment: TAction
Caption = 'Defragment'
OnUpdate = actDefragmentUpdate
end
object actStop: TAction
Caption = 'Stop'
Enabled = False
OnExecute = actStopExecute
end
object actUnselectAll: TAction
Caption = 'Reset all'
OnExecute = actUnselectAllExecute
end
object actSelectAll: TAction
Caption = 'Check all'
OnExecute = actSelectAllExecute
end
object actSelectDir: TAction
Caption = 'Select'
OnExecute = actSelectDirExecute
end
object actSelect: TAction
Caption = 'Check'
OnExecute = actSelectExecute
end
object actReset: TAction
Caption = 'Reset'
OnExecute = actResetExecute
end
end
object popupContextMenu: TPopupMenu
Left = 40
Top = 392
object Check1: TMenuItem
Action = actSelect
end
object Reset1: TMenuItem
Action = actReset
end
object Selectall1: TMenuItem
Action = actSelectAll
end
object Unselectall1: TMenuItem
Action = actUnselectAll
end
end
object ImageList1: TImageList
BkColor = clWhite
Height = 14
Width = 14
Left = 80
Top = 392
end
end