object MainForm: TMainForm Left = 102 Top = 56 Width = 650 Height = 431 ActiveControl = SpeedSearch Caption = 'Szipw' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Menu = MainMenu1 ShowHint = True OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 642 Height = 360 Align = alClient BevelOuter = bvNone TabOrder = 0 object PageControl1: TPageControl Left = 257 Top = 30 Width = 385 Height = 330 ActivePage = TabSheet1 Align = alClient TabOrder = 0 OnChange = PageControl1Change object TabSheet4: TTabSheet Caption = 'Properties' object Panel13: TPanel Left = 0 Top = 0 Width = 377 Height = 233 Align = alTop BevelOuter = bvNone TabOrder = 0 object GroupBox3: TGroupBox Left = 0 Top = 0 Width = 377 Height = 233 Align = alClient Caption = 'Archive comment' TabOrder = 0 object ArchiveComment: TMemo Left = 2 Top = 15 Width = 373 Height = 73 Hint = '|Archive comment' Align = alClient ScrollBars = ssVertical TabOrder = 0 OnExit = ArchiveCommentExit end object Panel18: TPanel Left = 2 Top = 88 Width = 373 Height = 143 Align = alBottom BevelOuter = bvNone TabOrder = 1 OnResize = Panel18Resize object GroupBox1: TGroupBox Left = 0 Top = 1 Width = 373 Height = 142 Align = alBottom Caption = 'Selected File properties' TabOrder = 0 object Panel21: TPanel Left = 2 Top = 16 Width = 359 Height = 124 BevelOuter = bvNone Caption = 'Panel21' TabOrder = 0 object Label3: TLabel Left = 1 Top = 4 Width = 56 Height = 13 Alignment = taRightJustify AutoSize = False Caption = 'Filename :' end object Label4: TLabel Left = 1 Top = 31 Width = 56 Height = 13 Alignment = taRightJustify AutoSize = False Caption = 'File Date :' end object Label5: TLabel Left = 1 Top = 55 Width = 56 Height = 13 Alignment = taRightJustify AutoSize = False Caption = 'File Time :' end object Label6: TLabel Left = 1 Top = 79 Width = 56 Height = 13 Alignment = taRightJustify AutoSize = False Caption = 'Comp Size :' end object Label12: TLabel Left = 1 Top = 104 Width = 56 Height = 13 Alignment = taRightJustify AutoSize = False Caption = 'File size :' end object Label11: TLabel Left = 175 Top = 104 Width = 42 Height = 13 AutoSize = False Caption = 'Method :' end object NameEdit: TEdit Left = 62 Top = 0 Width = 289 Height = 21 Hint = '|Full path name of file' Color = clWhite TabOrder = 0 OnExit = NameEditExit end object DateEdit: TMaskEdit Left = 62 Top = 28 Width = 92 Height = 21 Hint = '|File Date' Color = clWhite EditMask = '!99/99/00;1;0' MaxLength = 8 TabOrder = 1 Text = ' / / ' OnExit = DateTimeExit end object TimeEdit: TMaskEdit Left = 62 Top = 52 Width = 92 Height = 21 Hint = '|File Time' Color = clWhite EditMask = '!90:00:00;1;0' MaxLength = 8 TabOrder = 2 Text = ' : : ' OnExit = DateTimeExit end object SizeEdit: TEdit Left = 62 Top = 76 Width = 92 Height = 21 Hint = '|Compressed file size' TabStop = False Color = clBtnFace ReadOnly = True TabOrder = 3 end object LengthEdit: TEdit Left = 62 Top = 100 Width = 92 Height = 21 Hint = '|File size' TabStop = False Color = clBtnFace ReadOnly = True TabOrder = 4 end object MethodEdit: TEdit Left = 226 Top = 100 Width = 73 Height = 21 Hint = '|Compression method' Color = clBtnFace ReadOnly = True TabOrder = 5 end object RatioEdit: TEdit Left = 302 Top = 100 Width = 49 Height = 21 Hint = '|Compression ratio' Color = clBtnFace ReadOnly = True TabOrder = 6 end object attributes: TGroupBox Left = 160 Top = 23 Width = 191 Height = 75 Caption = 'File Attributes' TabOrder = 7 object Label13: TLabel Left = 124 Top = 57 Width = 48 Height = 13 Hint = '|Encrypted flag' AutoSize = False Caption = 'Encrypted' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label14: TLabel Left = 28 Top = 57 Width = 48 Height = 13 Hint = '|Volume label attribute' AutoSize = False Caption = 'Volume label' end object RdCtrl: TCheckBox Left = 10 Top = 35 Width = 85 Height = 17 Hint = '|Read Only attribute' Caption = 'Read Only' TabOrder = 2 OnMouseUp = AttrMouseUp end object ArcCtrl: TCheckBox Left = 10 Top = 15 Width = 85 Height = 17 Hint = '|Archive attribute' Caption = 'Archive' TabOrder = 0 OnMouseUp = AttrMouseUp end object HidCtrl: TCheckBox Left = 109 Top = 15 Width = 68 Height = 17 Hint = '|Hidden attribute' Caption = 'Hidden' TabOrder = 1 OnMouseUp = AttrMouseUp end object SysCtrl: TCheckBox Left = 109 Top = 35 Width = 68 Height = 17 Hint = '|System attribute' Caption = 'System' TabOrder = 3 OnMouseUp = AttrMouseUp end object VolCtrl: TCheckBox Left = 10 Top = 55 Width = 16 Height = 17 Hint = '|Volume label attribute' Caption = 'VolCtrl' Enabled = False TabOrder = 4 OnMouseUp = AttrMouseUp end object CryptCtrl: TCheckBox Left = 109 Top = 55 Width = 15 Height = 17 Hint = '|Encrypted flag' Caption = 'CryptCtrl' Enabled = False TabOrder = 5 end end end end end end end object FileComment: TMemo Left = 0 Top = 233 Width = 377 Height = 69 Hint = '|Comments associated with this file' Align = alClient ScrollBars = ssVertical TabOrder = 1 OnExit = FileCommentExit end end object TabSheet3: TTabSheet Caption = 'Contents' object Memo1: TRichEdit Left = 0 Top = 0 Width = 377 Height = 356 Hint = 'Contents|Content of selected file' Align = alClient PlainText = True PopupMenu = PopupMenu2 ScrollBars = ssBoth TabOrder = 0 OnExit = Memo1Exit end end object TabSheet2: TTabSheet Caption = 'Extract' object Panel6: TPanel Left = 0 Top = 0 Width = 377 Height = 193 Align = alClient BevelOuter = bvNone TabOrder = 0 object DirTree2: TDirTree Left = 0 Top = 0 Width = 377 Height = 193 Hint = '|Extract location, click the right mouse button for a popup menu' ReadOnly = True HideSelection = False Indent = 19 Align = alClient ParentColor = False TabOrder = 0 OnDragDrop = DirTree2DragDrop OnDragOver = DirTree2DragOver PopupMenu = DirTree2. Images = DirTree2. end end object Panel7: TPanel Left = 0 Top = -109 Width = 0 Height = 109 Align = alBottom BevelOuter = bvNone TabOrder = 1 OnResize = Panel7Resize object Label2: TLabel Left = 2 Top = 28 Width = 79 Height = 15 AutoSize = False Caption = 'Extract mask :' end object Label8: TLabel Left = 2 Top = 68 Width = 79 Height = 15 AutoSize = False Caption = 'Password :' end object ExtractBtn: TButton Left = 82 Top = 4 Width = 75 Height = 21 Hint = '|Extract files' Caption = 'Extract &All' Default = True TabOrder = 1 OnClick = All3Click end object Button4: TButton Left = 2 Top = 4 Width = 75 Height = 21 Hint = '|Extract files' Caption = '&Extract' TabOrder = 0 OnClick = ExtractBtnClick end object MaskEdit1: TEdit Left = 2 Top = 43 Width = 175 Height = 21 Hint = 'Extract mask|Type several masks by separating them with a '#39';'#39' (e' + 'x : *.exe;*.lst;*.txt )' TabOrder = 2 Text = '*.*' end object PasswordEdit3: TEdit Left = 2 Top = 83 Width = 175 Height = 21 Hint = 'Password|Pssword used do decrypt files' TabOrder = 3 end end end object TabSheet1: TTabSheet Caption = 'Add' object Panel5: TPanel Left = 0 Top = 0 Width = 377 Height = 213 Align = alClient BevelOuter = bvNone Caption = 'Panel5' TabOrder = 0 object Panel11: TPanel Left = 0 Top = 0 Width = 377 Height = 213 Align = alClient BevelOuter = bvNone TabOrder = 0 object dirList1: TdirList Left = 169 Top = 17 Width = 208 Height = 196 Hint = '|Available files and subdirectories in the current directory' Align = alClient Columns = <> DragMode = dmAutomatic ReadOnly = True HideSelection = False MultiSelect = True PopupMenu = dirList1. TabOrder = 1 ViewStyle = vsSmallIcon LargeImages = dirList1. SmallImages = dirList1. end object Header1: THeader Left = 0 Top = 0 Width = 377 Height = 17 Align = alTop BorderStyle = bsNone Sections.Sections = ( #0'169'#0'Directories' #0'29'#0'Files') TabOrder = 2 OnSized = Header1Sized end object DirTree1: TDirTree Left = 0 Top = 17 Width = 169 Height = 196 Hint = '|Available drives and directories' ReadOnly = True DragMode = dmAutomatic HideSelection = False Indent = 19 Align = alLeft ParentColor = False TabOrder = 0 PopupMenu = DirTree1. Images = DirTree1. DirList = dirList1 end end end object Panel3: TPanel Left = 0 Top = 213 Width = 377 Height = 89 Align = alBottom BevelOuter = bvNone TabOrder = 1 OnResize = Panel3Resize object Label1: TLabel Left = 4 Top = 51 Width = 55 Height = 11 Caption = 'Password :' end object StorePath1: TCheckBox Left = 84 Top = 0 Width = 97 Height = 17 Hint = '|Store full Path with filenames' Caption = '&Store Full Path' TabOrder = 0 OnClick = StorePath1Click end object RecurseDirs: TCheckBox Left = 84 Top = 16 Width = 141 Height = 17 Hint = '|Recurse sub directories' Caption = '&Recurse sub directories' TabOrder = 1 OnClick = RecurseDirsClick end object PasswordEdit: TEdit Left = 4 Top = 67 Width = 325 Height = 21 Hint = 'Password|Password used to encrypt the files' MaxLength = 80 TabOrder = 5 end object StoreVolume: TCheckBox Left = 84 Top = 32 Width = 121 Height = 17 Hint = '|Store volume label of drive in archive' Caption = 'Store &Volume label' TabOrder = 2 OnClick = StoreVolumeClick end object AddBtn: TButton Left = 2 Top = 4 Width = 75 Height = 21 Hint = '|Add files to archive' Caption = '&Add' Default = True TabOrder = 7 OnClick = AddBtnClick end object SpanDisks: TCheckBox Left = 84 Top = 48 Width = 97 Height = 17 Hint = '|Span disks' Caption = 'Span &Disks' Enabled = False TabOrder = 3 end object MoveFiles: TCheckBox Left = 4 Top = 28 Width = 65 Height = 17 Hint = '|Move files (delete after compress)' Caption = 'Move' TabOrder = 6 OnClick = MoveFilesClick end object GroupBox6: TGroupBox Left = 224 Top = 0 Width = 85 Height = 65 Caption = 'Action' TabOrder = 4 object Add1: TRadioButton Left = 12 Top = 12 Width = 53 Height = 17 Hint = '|Add files' Caption = 'Add' TabOrder = 0 end object Update1: TRadioButton Left = 12 Top = 28 Width = 65 Height = 17 Hint = '|Update files (Update changed files and add new files)' Caption = 'Update' Checked = True TabOrder = 1 TabStop = True end object Freshen1: TRadioButton Left = 12 Top = 44 Width = 69 Height = 17 Hint = '|Freshen files (Only update changed files)' Caption = 'Freshen' TabOrder = 2 end end end end object TabSheet5: TTabSheet Caption = 'Add with list' object Panel14: TPanel Left = 0 Top = 189 Width = 377 Height = 167 Align = alClient BevelOuter = bvNone TabOrder = 0 object AddListBox1: TListBox Left = 0 Top = 0 Width = 377 Height = 139 Hint = '|List of search items' Align = alClient ItemHeight = 13 TabOrder = 0 end object Panel19: TPanel Left = 0 Top = 139 Width = 377 Height = 28 Align = alBottom TabOrder = 1 OnResize = Panel19Resize object PasswordEdit2: TEdit Left = 4 Top = 4 Width = 121 Height = 21 Hint = 'Password|Password used to encrypt archives' TabOrder = 0 end end end object Panel15: TPanel Left = 0 Top = 0 Width = 0 Height = 189 Align = alTop BevelOuter = bvNone TabOrder = 1 object Panel16: TPanel Left = 109 Top = 0 Width = 268 Height = 189 Align = alClient BevelOuter = bvNone TabOrder = 0 object Panel8: TPanel Left = 0 Top = 140 Width = 268 Height = 49 Align = alBottom BevelOuter = bvNone TabOrder = 1 object AddListBtn: TButton Left = 52 Top = 24 Width = 70 Height = 21 Hint = '|Add search item' Caption = '&+ Add to list' TabOrder = 2 OnClick = AddListBtnClick end object RemoveListBtn: TButton Left = 128 Top = 24 Width = 70 Height = 21 Hint = '|Remove search item' Caption = '&- Remove' TabOrder = 3 OnClick = RemoveListBtnClick end object SaveListBtn: TButton Left = 128 Top = 4 Width = 70 Height = 21 Hint = '|Save list to file' Caption = '&Save list' TabOrder = 1 OnClick = SaveListBtnClick end object LoadListBtn: TButton Left = 52 Top = 4 Width = 70 Height = 19 Hint = '|Load list from file' Caption = '&Load list' TabOrder = 0 OnClick = LoadListBtnClick end end object DirTree3: TDirTree Left = 0 Top = 0 Width = 268 Height = 140 Hint = '|Available drives and directories' ReadOnly = True HideSelection = False Indent = 19 Align = alClient ParentColor = False TabOrder = 0 PopupMenu = DirTree3. Images = DirTree3. end end object Panel17: TPanel Left = 0 Top = 0 Width = 109 Height = 189 Align = alLeft BevelOuter = bvNone TabOrder = 1 object Label7: TLabel Left = 4 Top = 0 Width = 79 Height = 11 Caption = 'Search mask :' end object AddListToZipBtn: TButton Left = 0 Top = 166 Width = 75 Height = 21 Hint = '|Add files to archive' Caption = '<< &Add to zip' Default = True Enabled = False TabOrder = 5 OnClick = AddListToZipBtnClick end object SearchMaskEdit: TEdit Left = 5 Top = 14 Width = 84 Height = 21 Hint = '|Mask used for searching filenames (ex: *.exe;*.txt;*.lst)' TabOrder = 0 Text = '*.*' end object RecurseDirs2: TCheckBox Left = 4 Top = 132 Width = 85 Height = 17 Hint = '|Recurse sub directories' Caption = 'Recurse dirs' TabOrder = 3 OnClick = RecurseDirs2Click end object GroupBox5: TGroupBox Left = 4 Top = 36 Width = 85 Height = 77 Caption = 'Action' TabOrder = 1 object Add2: TRadioButton Left = 8 Top = 16 Width = 53 Height = 17 Hint = '|Add files' Caption = 'Add' TabOrder = 0 end object Update2: TRadioButton Left = 8 Top = 36 Width = 65 Height = 17 Hint = '|Update files (Update changed files and add new files)' Caption = 'Update' Checked = True TabOrder = 1 TabStop = True end object Freshen2: TRadioButton Left = 8 Top = 56 Width = 69 Height = 17 Hint = '|Freshen files (Only update changed files)' Caption = 'Freshen' TabOrder = 2 end end object SpanDisks2: TCheckBox Left = 4 Top = 148 Width = 81 Height = 17 Caption = 'Span disks' TabOrder = 4 end object StorePath2: TCheckBox Left = 4 Top = 116 Width = 93 Height = 17 Hint = '|Store full Path with filenames' Caption = '&Store Full Path' TabOrder = 2 OnClick = StorePath2Click end end end end object TabSheet6: TTabSheet Caption = 'Configuration' object Panel9: TPanel Left = 0 Top = 0 Width = 377 Height = 356 Align = alClient BevelOuter = bvNone TabOrder = 0 OnResize = Panel9Resize object ConfigPanel: TPanel Left = 3 Top = 2 Width = 353 Height = 351 BevelOuter = bvNone TabOrder = 0 object Label10: TLabel Left = 10 Top = 46 Width = 151 Height = 15 Caption = 'Extraction Overwrite options :' end object Label9: TLabel Left = 10 Top = 6 Width = 155 Height = 15 Caption = 'Test archive after compression :' end object GroupBox8: TGroupBox Left = 6 Top = 194 Width = 325 Height = 149 Caption = 'Directories' TabOrder = 8 object Label17: TLabel Left = 8 Top = 34 Width = 120 Height = 15 AutoSize = False Caption = 'Default Open directory :' end object Label15: TLabel Left = 8 Top = 71 Width = 120 Height = 15 AutoSize = False Caption = 'Default Add directory :' end object Label16: TLabel Left = 8 Top = 107 Width = 120 Height = 15 AutoSize = False Caption = 'Default Extract directory :' end object DefopenDir: TEdit Left = 8 Top = 49 Width = 277 Height = 21 Hint = '|Default path when opening zip files' TabOrder = 2 end object DefAddDir: TEdit Left = 8 Top = 86 Width = 277 Height = 21 Hint = '|Default path for adding files' TabOrder = 4 end object DefExDir: TEdit Left = 8 Top = 122 Width = 277 Height = 21 Hint = '|Default path for extracting files' TabOrder = 6 end object Button3: TButton Left = 288 Top = 49 Width = 25 Height = 19 Caption = '...' TabOrder = 3 OnClick = Button3Click end object Button1: TButton Left = 288 Top = 86 Width = 25 Height = 19 Caption = '...' TabOrder = 5 OnClick = Button1Click end object Button2: TButton Left = 288 Top = 122 Width = 25 Height = 19 Caption = '...' TabOrder = 7 OnClick = Button2Click end object UseDefDirs: TRadioButton Left = 8 Top = 16 Width = 133 Height = 17 Caption = 'Use default directories' TabOrder = 0 OnClick = UseDefDirsClick end object UseLastDirs: TRadioButton Left = 148 Top = 16 Width = 165 Height = 17 Caption = 'Use last accessed directories' Checked = True TabOrder = 1 TabStop = True OnClick = UseLastDirsClick end end object SortArchive: TCheckBox Left = 10 Top = 158 Width = 325 Height = 17 Caption = 'Sort archive display (with big archives, loading will be slower)' TabOrder = 7 OnClick = SortArchiveClick end object OnlyText: TCheckBox Left = 198 Top = 142 Width = 129 Height = 17 Caption = 'Only text files edit ' TabOrder = 6 OnClick = OnlyTextClick end object configrecurse: TCheckBox Left = 198 Top = 122 Width = 145 Height = 17 Hint = '|Recurse sub directories while searching for files' Caption = 'Recurse sub directories' TabOrder = 5 OnClick = configrecurseClick end object configstorepath: TCheckBox Left = 198 Top = 102 Width = 133 Height = 17 Hint = '|Store full pathname of comrpessed files' Caption = 'Store full path Name' TabOrder = 4 OnClick = configstorepathClick end object GroupBox7: TGroupBox Left = 10 Top = 88 Width = 177 Height = 67 Caption = 'Compression level' TabOrder = 2 object Label19: TLabel Left = 144 Top = 12 Width = 19 Height = 13 Alignment = taRightJustify Caption = 'max' end object Label18: TLabel Left = 16 Top = 12 Width = 16 Height = 13 Caption = 'min' end object ComprLevel: TTrackBar Left = 4 Top = 24 Width = 169 Height = 37 Hint = '|Compression level (Minimum=Fastest to Maximum=Slowest)' Ctl3D = True Max = 3 Orientation = trHorizontal ParentCtl3D = False PageSize = 1 Frequency = 1 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 0 TabStop = False TickMarks = tmTopLeft TickStyle = tsAuto end end object GroupBox2: TGroupBox Left = 198 Top = 6 Width = 109 Height = 93 Caption = 'Default Action' TabOrder = 3 object ActionAdd: TRadioButton Left = 16 Top = 20 Width = 53 Height = 17 Hint = '|Add files' Caption = 'Add' TabOrder = 0 OnClick = Add1Click end object ActionUpdate: TRadioButton Left = 16 Top = 44 Width = 65 Height = 17 Hint = '|Update files (Update changed files and add new files)' Caption = 'Update' Checked = True TabOrder = 1 TabStop = True OnClick = ActionUpdateClick end object ActionFreshen: TRadioButton Left = 16 Top = 68 Width = 77 Height = 17 Hint = '|Freshen files (Only update changed files)' Caption = 'Freshen' TabOrder = 2 OnClick = ActionFreshenClick end end object Overwrite: TComboBox Left = 10 Top = 62 Width = 149 Height = 21 Hint = '|Options for overwrite for extracting' Style = csDropDownList ItemHeight = 13 Items.Strings = ( 'Always' 'If newer' 'Prompt') TabOrder = 1 OnClick = OverwriteClick end object TestAfter: TComboBox Left = 10 Top = 22 Width = 149 Height = 21 Hint = '|Test after compression flag' Style = csDropDownList ItemHeight = 13 Items.Strings = ( 'Never' 'Prompt' 'Always') TabOrder = 0 OnClick = TestAfterClick end object AssociateFile: TCheckBox Left = 10 Top = 174 Width = 325 Height = 17 Hint = '|This enables Szipw to register zip files with itself' Caption = 'Enable ZIP file association and Zip template with Szipw ' TabOrder = 9 OnClick = AssociateFileClick end end end end end object Panel10: TPanel Left = 0 Top = 30 Width = 257 Height = 330 Align = alLeft BevelOuter = bvNone TabOrder = 1 object Splitter: TPanel Left = 252 Top = 0 Width = 5 Height = 330 Cursor = crHSplit Hint = '|Drag this to resize panels' Align = alRight TabOrder = 0 OnMouseDown = SplitterMouseDown end object Panel12: TPanel Left = 0 Top = 0 Width = 252 Height = 330 Align = alClient BevelOuter = bvNone TabOrder = 1 object Panel20: TPanel Left = 0 Top = 306 Width = 252 Height = 24 Align = alBottom BevelOuter = bvNone TabOrder = 0 OnResize = Panel20Resize object SpeedSearch: TEdit Left = 0 Top = 1 Width = 121 Height = 21 Hint = 'Speed Search|Speed search names in zipfile' TabOrder = 0 OnKeyUp = SpeedSearchKeyUp end end object zipViewer1: TzipViewer Left = 0 Top = 0 Width = 252 Height = 306 ReadOnly = True DragMode = dmAutomatic HideSelection = False Indent = 19 Align = alClient ParentColor = False TabOrder = 1 OnClick = zipViewer1Click OnDragDrop = zipViewer1DragDrop OnDragOver = zipViewer1DragOver OnDblClick = zipViewer1DblClick OnKeyUp = zipViewer1KeyUp OnProgress = zipViewer1Progress OnOverAllProgress = zipViewer1OverAllProgress OnStatusMessage = zipViewer1StatusMessage end end end object SpeedPanel: TPanel Left = 0 Top = 0 Width = 642 Height = 30 Align = alTop ParentShowHint = False ShowHint = True TabOrder = 2 object OpenBtn: TSpeedButton Left = 66 Top = 2 Width = 25 Height = 25 Hint = 'Open zip|Open zip file' Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 333FFFFFFFFFFFFFF3333380000000000000333333888888888888883F333300 7B7B7B7B7B7B033333883F33333333338F33330F07B7B7B7B7B70333338F8F33 3333333383F3330B0B7B7B7B7B7B7033338F83F33333333338F3330FB0B7B7B7 B7B7B033338F38F333333333383F330BF07B7B7B7B7B7B03338F383FFFFF3333 338F330FBF000007B7B7B703338F33888883FFFFFF83330BFBFBFBF000000033 338F3333333888888833330FBFBFBFBFBFB03333338F333333333338F333330B FBFBFBFBFBF03333338F33333FFFFFF83333330FBFBF0000000333333387FFFF 8888888333333330000033333333333333388888333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333} NumGlyphs = 2 OnClick = Open1Click end object SaveBtn: TSpeedButton Left = 94 Top = 2 Width = 25 Height = 25 Hint = 'Save changes|Writes all changes to the zip central directory' Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333FFFFFFFFFFFFFF3333380000000000008333 333888F8FF888F888F333330CC08CCF770CC0333333888F8FF888F888F333330 CC08CCF770CC0333333888F888888F888F333330CC07887770CC03333338888F FFFFF8888F333330CC60000006CC033333388888888888888F333330CCCCCCCC CCCC033333388888888888888F333330C6000000006C03333338888888888888 8F333330C0FFFFFFFF0C0333333888FFFFFFFF888F333330C0FFFFFFFF0C0333 333888FFFFFFFF888F333330C0FFFFFFFF0C0333333888FFFFFFFF888F333330 C0FFFFFFFF0C0333333888FFFFFFFF888F33333000FFFFFFFF000333333888FF FFFFFF888F333330C0FFFFFFFF0C0333333888FFFFFFFF888F33333800000000 0000833333388888888888888333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333} NumGlyphs = 2 OnClick = SaveItemClick end object ExitBtn: TSpeedButton Left = 123 Top = 2 Width = 25 Height = 25 Hint = 'Exit|Quit szipw' Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777777 777777773FFFFFFFFFFFF333333F888888888888F7F7F7888888888888883333 33888888888888877F7F788888888888888F333FF88844444400888FFF444444 88888888888333888883333334D5007FFF433333333338F888F3338F33333333 345D50FFFF4333333333388788F3338F3333333334D5D0FFFF433333333338F8 78F3338F33333333345D50FEFE4333333333388788F3338F3333333334D5D0FF FF433333333338F878F3338F33333333345D50FEFE4333333333388788F3338F 3333333334D5D0FFFF433333333338F878F3338F33333333345D50FEFE433333 3333388788F3338F3333333334D5D0EFEF433333333338F878F3338F33333333 345D50FEFE4333333333388788F3338F3333333334D5D0EFEF433333333338F8 F8FFFF8F33333333344444444443333333333888888888833333333333333333 3333333333333333FFFFFF333333333333300000033333333333333888888F33 333333333330AAAA0333333333333338FFFF8F33333333333330000003333333 33333338888883333333} NumGlyphs = 2 OnClick = Quit1Click end object NewBtn: TSpeedButton Left = 38 Top = 2 Width = 25 Height = 25 Hint = 'New zip|Create a new zip file' Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} NumGlyphs = 2 OnClick = New1Click end object SpeedButton1: TSpeedButton Left = 10 Top = 2 Width = 25 Height = 25 Hint = 'Backup link wizard|Create a backup link' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00370777033333 3330337F3F7F33333F3787070003333707303F737773333373F7007703333330 700077337F3333373777887007333337007733F773F333337733700070333333 077037773733333F7F37703707333300080737F373333377737F003333333307 78087733FFF3337FFF7F33300033330008073F3777F33F777F73073070370733 078073F7F7FF73F37FF7700070007037007837773777F73377FF007777700730 70007733FFF77F37377707700077033707307F37773F7FFF7337080777070003 3330737F3F7F777F333778080707770333333F7F737F3F7F3333080787070003 33337F73FF7377733333078000770333333373377733733333330000} NumGlyphs = 2 OnClick = Createbackuplink1Click end end end object Panel2: TPanel Left = 0 Top = 360 Width = 642 Height = 25 Align = alBottom BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object PanelMsg: TPanel Left = 2 Top = 2 Width = 467 Height = 21 Align = alClient Alignment = taLeftJustify BevelOuter = bvNone TabOrder = 0 object MsgPanel: TPanel Left = 0 Top = 0 Width = 402 Height = 21 Align = alClient Alignment = taLeftJustify BevelOuter = bvLowered TabOrder = 0 end object PanelCancel: TPanel Left = 402 Top = 0 Width = 65 Height = 21 Align = alRight BevelOuter = bvLowered TabOrder = 1 Visible = False OnResize = PanelCancelResize object CancelButton: TButton Left = 1 Top = 1 Width = 63 Height = 19 Cancel = True Caption = 'Cancel' TabOrder = 0 OnClick = CancelButtonClick end end end object Panel4: TPanel Left = 469 Top = 2 Width = 171 Height = 21 Align = alRight BevelOuter = bvLowered TabOrder = 1 object Meter: TProgressBar Left = 88 Top = 1 Width = 82 Height = 19 Hint = 'Current file progress' Align = alRight Min = 0 Max = 100 TabOrder = 0 end object OverAllMeter: TProgressBar Left = 1 Top = 1 Width = 87 Height = 19 Hint = 'Overall Progress' Align = alClient Min = 0 Max = 100 TabOrder = 1 end end end object TPopupMenu object TMenuItem Caption = '&Make Directory' ShortCut = 0 end object TMenuItem Caption = '&Remove Directory' ShortCut = 0 end end object TPopupMenu object TMenuItem Caption = '&Make Directory' ShortCut = 0 end object TMenuItem Caption = '&Delete' ShortCut = 0 end end object TPopupMenu object TMenuItem Caption = '&Make Directory' ShortCut = 0 end object TMenuItem Caption = '&Remove Directory' ShortCut = 0 end end object TPopupMenu object TMenuItem Caption = '&Make Directory' ShortCut = 0 end object TMenuItem Caption = '&Remove Directory' ShortCut = 0 end end object TPopupMenu object TMenuItem Caption = '&Make Directory' ShortCut = 0 end object TMenuItem Caption = '&Remove Directory' ShortCut = 0 end end object TPopupMenu object TMenuItem Caption = '&Make Directory' ShortCut = 0 end object TMenuItem Caption = '&Delete' ShortCut = 0 end end object TPopupMenu Left = 4 Top = 4 object MakeDirectory1: TMenuItem Caption = '&Make Directory' ShortCut = 0 end object TMenuItem Caption = '&Remove Directory' ShortCut = 0 end end object MainMenu1: TMainMenu Left = 20 Top = 40 object File1: TMenuItem Caption = '&File' ShortCut = 0 object Open1: TMenuItem Caption = '&Open' Hint = '|Open zip file' ShortCut = 113 OnClick = Open1Click end object New1: TMenuItem Caption = '&New' Hint = '|Create and open a new zip file' ShortCut = 114 OnClick = New1Click end object SaveItem: TMenuItem Caption = '&Save changes' Enabled = False Hint = '|Update changes in zip file' ShortCut = 0 OnClick = SaveItemClick end object N9: TMenuItem Caption = '-' ShortCut = 0 end object Createbackuplink1: TMenuItem Caption = '&Create backup link' ShortCut = 0 OnClick = Createbackuplink1Click end object RebuildFile: TMenuItem Caption = '&Rebuild using local info' Hint = '|Rebuild using local header information' ShortCut = 0 OnClick = RebuildFileClick end object N6: TMenuItem Tag = 7 Caption = '-' ShortCut = 0 end object Newwindow1: TMenuItem Caption = '&New window' Hint = '|Launch new Zipw' ShortCut = 0 OnClick = Newwindow1Click end object N1: TMenuItem Caption = '-' ShortCut = 0 end object Quit1: TMenuItem Caption = '&Exit' Hint = '|Exit szipw 32' ShortCut = 16472 OnClick = Quit1Click end end object Archive1: TMenuItem Caption = '&Archive' ShortCut = 0 object Test1: TMenuItem Caption = '&Test' Hint = '|Test zip file' ShortCut = 115 OnClick = Test1Click end object Sort1: TMenuItem Caption = '&Sort' Hint = '|Sort filenames in zip file' ShortCut = 116 OnClick = Sort1Click end object Recompress1: TMenuItem Caption = '&Recompress' Hint = '|Recompress file using different compression method' ShortCut = 0 OnClick = Recompress1Click end object N8: TMenuItem Caption = '-' ShortCut = 0 end object RemovefilesthatfailCRCcheck1: TMenuItem Caption = 'Re&move files that fail CRC check' ShortCut = 0 OnClick = RemovefilesthatfailCRCcheck1Click end object N7: TMenuItem Caption = '-' ShortCut = 0 end object MakeEXEfile1: TMenuItem Caption = '&Zip to EXE' ShortCut = 0 OnClick = MakeEXEfile1Click end object MakeZipfile1: TMenuItem Caption = '&EXE to Zip' ShortCut = 0 OnClick = MakeZipfile1Click end end object File2: TMenuItem Caption = 'Files in &Zip' ShortCut = 0 object Extract1: TMenuItem Caption = '&Extract' ShortCut = 0 object FileDir3: TMenuItem Caption = '&File/Dir' Hint = '|Extract selected file' ShortCut = 117 OnClick = ExtractBtnClick end object All3: TMenuItem Caption = '&All' Hint = '|Extract all files' ShortCut = 0 OnClick = All3Click end end object Remove1: TMenuItem Caption = '&Remove' ShortCut = 0 object FileDir4: TMenuItem Caption = '&File/Dir' Hint = '|Remove selected file' ShortCut = 16430 OnClick = FileDir4Click end object All4: TMenuItem Caption = '&All' Hint = '|Remove all files' ShortCut = 0 OnClick = All4Click end object Bywildcard1: TMenuItem Caption = '&By wildcard' ShortCut = 0 OnClick = Bywildcard1Click end end end object Help1: TMenuItem Caption = '&Help' ShortCut = 0 object Help2: TMenuItem Caption = '&Help' ShortCut = 112 OnClick = Help2Click end object N2: TMenuItem Caption = '-' ShortCut = 0 end object Commandlineoptions1: TMenuItem Caption = '&Command line options' ShortCut = 0 OnClick = Commandlineoptions1Click end object Shareware1: TMenuItem Caption = '&Shareware' ShortCut = 0 OnClick = Shareware1Click end object Registering1: TMenuItem Caption = '&Register' ShortCut = 0 OnClick = Registering1Click end object N3: TMenuItem Caption = '-' ShortCut = 0 end object About1: TMenuItem Caption = '&About' ShortCut = 0 OnClick = About1Click end end end object OpenDialog1: TOpenDialog FileEditStyle = fsEdit Filter = 'Zip files (*.zip;*.exe)|*.zip;*.exe' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofShareAware] Title = 'Open zip file' Left = 52 Top = 40 end object SaveDialog1: TSaveDialog DefaultExt = 'zip' FileEditStyle = fsEdit Filter = 'Zip files (*.zip;*.exe)|*.zip;*.exe' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofShareAware, ofNoReadOnlyReturn] Title = 'New zip file' Left = 80 Top = 40 end object popupmenu1: TPopupMenu Left = 108 Top = 40 object Extract3: TMenuItem Caption = 'Extract' ShortCut = 0 object FileDir2: TMenuItem Caption = 'File/Dir' Hint = '|Extract selected file' ShortCut = 0 OnClick = ExtractBtnClick end object All2: TMenuItem Caption = 'All' Hint = '|Extract all files' ShortCut = 0 OnClick = All3Click end end object Extract2: TMenuItem Caption = 'Remove' ShortCut = 0 object FileDir1: TMenuItem Caption = 'File/Dir' ShortCut = 0 OnClick = FileDir4Click end object All1: TMenuItem Caption = 'All' ShortCut = 0 OnClick = All4Click end object Bywildcard2: TMenuItem Caption = '&By wildcard' ShortCut = 0 OnClick = Bywildcard1Click end end object Movetotop1: TMenuItem Caption = '&Move to top' Hint = '|Move direcory or file to the top of the tree' ShortCut = 0 OnClick = Movetotop1Click end object N4: TMenuItem Caption = '-' ShortCut = 0 end object Test2: TMenuItem Caption = 'Test' ShortCut = 0 OnClick = Test1Click end object Sort2: TMenuItem Caption = 'Sort' Hint = '|Sort filenames in zip file' ShortCut = 0 OnClick = Sort1Click end object Recompress2: TMenuItem Caption = 'Recompress' Hint = '|Recompress using different compression method' ShortCut = 0 OnClick = Recompress1Click end object N5: TMenuItem Caption = '-' ShortCut = 0 end object Exit1: TMenuItem Caption = 'Exit' Hint = '|Exit Szipw 32' ShortCut = 0 OnClick = Quit1Click end end object PrintDialog1: TPrintDialog Left = 136 Top = 40 end object OpenDialog2: TOpenDialog DefaultExt = 'lst' FileEditStyle = fsEdit Filter = 'List files (*.lst)|*.lst' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Title = 'Open path list' Left = 497 Top = 320 end object SaveDialog2: TSaveDialog DefaultExt = 'lst' FileEditStyle = fsEdit Filter = 'List files (*.lst)|*.lst' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist] Title = 'Save path list' Left = 581 Top = 304 end object PopupMenu2: TPopupMenu OnPopup = PopupMenu2Popup Left = 585 Top = 352 object Copy1: TMenuItem Caption = 'Copy' ShortCut = 0 OnClick = Copy1Click end object Print1: TMenuItem Caption = 'Print' ShortCut = 0 OnClick = Print1Click end object N10: TMenuItem Caption = '-' ShortCut = 0 end object Wordwrap1: TMenuItem Caption = 'Wordwrap' ShortCut = 0 OnClick = Wordwrap1Click end end end