home *** CD-ROM | disk | FTP | other *** search
- object frmAdd2: TfrmAdd2
- Left = 194
- Top = 143
- BorderStyle = bsDialog
- Caption = 'Add'
- ClientHeight = 446
- ClientWidth = 490
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- OnActivate = FormActivate
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object lblAction: TLabel
- Left = 8
- Top = 280
- Width = 33
- Height = 13
- Caption = '&Action:'
- FocusControl = cboSwitch
- end
- object lblCompression: TLabel
- Left = 8
- Top = 320
- Width = 63
- Height = 13
- Caption = 'Compr&ession:'
- FocusControl = cboDeflate
- end
- object lblSpann: TLabel
- Left = 8
- Top = 360
- Width = 107
- Height = 13
- Caption = 'Multiple &disk spanning:'
- Enabled = False
- FocusControl = cboSpann
- end
- object Bevel1: TBevel
- Left = 8
- Top = 408
- Width = 473
- Height = 9
- Shape = bsTopLine
- end
- object Label1: TLabel
- Left = 248
- Top = 320
- Width = 106
- Height = 13
- Caption = 'Save path in&formation:'
- FocusControl = cboPath
- end
- object box: TListBox
- Left = 520
- Top = 16
- Width = 25
- Height = 25
- ItemHeight = 13
- TabOrder = 10
- Visible = False
- end
- object Page: TPageControl
- Left = 8
- Top = 16
- Width = 473
- Height = 257
- ActivePage = TabIn
- HotTrack = True
- TabOrder = 0
- object TabIn: TTabSheet
- Caption = 'Include'
- object List: TdfsExtListView
- Left = 0
- Top = 0
- Width = 465
- Height = 193
- Columns = <
- item
- Caption = 'Files and/or Folders'
- Width = 445
- end>
- ExtendedStyles = [lvxFullRowSelect]
- NoColumnResize = False
- ColumnsFormat = <>
- AutoColumnSort = acsSortToggle
- Align = alTop
- MultiSelect = True
- OnChange = ListChange
- TabOrder = 0
- ViewStyle = vsReport
- SmallImages = frmMain.sysSmallImages
- end
- object btnAdd: TButton
- Left = 8
- Top = 200
- Width = 75
- Height = 25
- Caption = '&Add Files'
- TabOrder = 1
- OnClick = btnAddClick
- end
- object btnAddFolder: TButton
- Left = 88
- Top = 200
- Width = 75
- Height = 25
- Caption = 'Add &Folder'
- TabOrder = 2
- OnClick = btnAddFolderClick
- end
- object btnRemove: TButton
- Left = 382
- Top = 200
- Width = 75
- Height = 25
- Caption = '&Remove'
- TabOrder = 4
- OnClick = btnRemoveClick
- end
- object edtWild: TEdit
- Left = 168
- Top = 202
- Width = 75
- Height = 21
- TabOrder = 3
- Text = '*.*'
- end
- end
- object TabEx: TTabSheet
- Caption = 'Exclude'
- ImageIndex = 1
- object btnExAdd: TButton
- Left = 8
- Top = 200
- Width = 75
- Height = 25
- Caption = '&Add Files'
- TabOrder = 1
- OnClick = btnExAddClick
- end
- object btnExAddFolder: TButton
- Left = 88
- Top = 200
- Width = 75
- Height = 25
- Caption = 'Add &Folder'
- TabOrder = 2
- OnClick = btnExAddFolderClick
- end
- object btnRemoveEx: TButton
- Left = 382
- Top = 200
- Width = 75
- Height = 25
- Caption = '&Remove'
- TabOrder = 5
- OnClick = btnRemoveExClick
- end
- object ExList: TdfsExtListView
- Left = 0
- Top = 0
- Width = 465
- Height = 193
- Columns = <
- item
- Caption = 'Files and/or Folders'
- Width = 445
- end>
- ExtendedStyles = [lvxFullRowSelect]
- NoColumnResize = False
- ColumnsFormat = <>
- AutoColumnSort = acsSortToggle
- Align = alTop
- MultiSelect = True
- TabOrder = 0
- ViewStyle = vsReport
- SmallImages = frmMain.sysSmallImages
- end
- object edtExWild: TEdit
- Left = 168
- Top = 202
- Width = 75
- Height = 21
- TabOrder = 3
- Text = '*.*'
- end
- object btnAddWild: TButton
- Left = 248
- Top = 200
- Width = 105
- Height = 25
- Caption = 'Add &Wildcard only'
- TabOrder = 4
- OnClick = btnAddWildClick
- end
- end
- object tabComment: TTabSheet
- Caption = 'Comment'
- ImageIndex = 2
- object memComment: TMemo
- Left = 8
- Top = 48
- Width = 449
- Height = 169
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 0
- end
- object ckbComment: TCheckBox
- Left = 8
- Top = 16
- Width = 129
- Height = 17
- Caption = 'Add/Edit comment'
- TabOrder = 1
- OnClick = ckbCommentClick
- end
- object Button1: TButton
- Left = 360
- Top = 16
- Width = 99
- Height = 25
- Caption = 'Load Co&mment'
- TabOrder = 2
- OnClick = Button1Click
- end
- end
- end
- object cboSwitch: TComboBox
- Left = 8
- Top = 296
- Width = 233
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 1
- Items.Strings = (
- 'Add (and replace) files'
- 'Move')
- end
- object cboDeflate: TComboBox
- Left = 8
- Top = 336
- Width = 233
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 2
- end
- object cboSpann: TComboBox
- Left = 8
- Top = 376
- Width = 233
- Height = 21
- Enabled = False
- ItemHeight = 13
- TabOrder = 3
- Items.Strings = (
- 'Automatic'
- 'No spanning')
- end
- object btnPassOK: TButton
- Left = 248
- Top = 292
- Width = 233
- Height = 25
- Caption = '&Password'
- TabOrder = 4
- OnClick = btnPassOKClick
- end
- object btnCancel: TButton
- Left = 408
- Top = 416
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 9
- OnClick = btnCancelClick
- end
- object btnCompress: TButton
- Left = 328
- Top = 416
- Width = 75
- Height = 25
- Caption = '&Compress'
- Default = True
- ModalResult = 1
- TabOrder = 8
- end
- object ExBox: TListBox
- Left = 544
- Top = 16
- Width = 25
- Height = 25
- ItemHeight = 13
- TabOrder = 11
- Visible = False
- end
- object btnSave: TButton
- Left = 326
- Top = 8
- Width = 75
- Height = 25
- Caption = 'Sa&ve File List'
- TabOrder = 12
- OnClick = btnSaveClick
- end
- object btnLoad: TButton
- Left = 406
- Top = 8
- Width = 75
- Height = 25
- Caption = '&Load File List'
- TabOrder = 13
- OnClick = btnLoadClick
- end
- object cboPath: TComboBox
- Left = 248
- Top = 336
- Width = 233
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 5
- Items.Strings = (
- 'No path information'
- 'Relative path'
- 'Full path')
- end
- object ckbSubfolders: TCheckBox
- Left = 248
- Top = 376
- Width = 185
- Height = 17
- Caption = '&Include subfolders (recurse)'
- TabOrder = 6
- end
- object btnHelp: TButton
- Left = 8
- Top = 416
- Width = 75
- Height = 25
- Caption = '&Help'
- TabOrder = 7
- OnClick = btnHelpClick
- end
- object dlgOpen: TOpenDialog
- Filter = 'All files|*.*'
- FilterIndex = 11
- Options = [ofHideReadOnly, ofAllowMultiSelect, ofFileMustExist, ofEnableSizing]
- Title = 'Add Files'
- Left = 432
- Top = 144
- end
- object Browse: TdfsBrowseDirectoryDlg
- Title = 'Please select a folder.'
- Options = [bfDirectoriesOnly, bfNewDialogStyle]
- StatusText = 'C:\WINDOWS\Desktop'
- Caption = 'Add Folder'
- ShowSelectionInStatus = True
- Left = 400
- Top = 208
- end
- object FormCenter1: TFormCenter
- Center = True
- Left = 432
- Top = 208
- end
- object SaveList: TSaveDialog
- Filter = 'UltimateZip list file (*.uzl)|*.uzl'
- Title = 'Save File List'
- Left = 396
- Top = 176
- end
- object LoadList: TOpenDialog
- Filter = 'UltimateZip list file (*.uzl)'
- Options = [ofHideReadOnly, ofFileMustExist, ofEnableSizing]
- Title = 'Load File List'
- Left = 428
- Top = 176
- end
- object odComment: TOpenDialog
- Filter = 'Text files (*.txt)|*.txt'
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
- Title = 'Load Comment'
- Left = 404
- Top = 144
- end
- end
-