object FormMain: TFormMain Left = 229 Top = 108 Width = 629 Height = 452 Caption = 'PEPSOFT Absolute Security * Unregistered *' Font.Color = clWindowText Font.Height = -14 Font.Name = 'System' Font.Style = [] Position = poDefaultPosOnly Scaled = False Visible = True OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 16 object StatusBar1: TAdvStatusBar Left = 0 Top = 406 Width = 621 Height = 19 Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Panels = < item Text = 'LabelFileName' Width = 180 end item Alignment = taCenter Text = 'Info' Width = 70 end item Text = 'Size' Width = 230 end item Width = 80 end item Width = 50 end> ParentFont = False SimplePanel = False object LedReady: KrLed Left = 568 Top = 5 Width = 20 Height = 10 Hint = 'Just a LED' About = 'Kr Led, version 1.00, 04-10-97' CaptionAlign = caLeft CaptionBorder = olNone CaptionLineColor = clBlack CaptionBackGround = clBlue LedOnColor = clLime LedOffColor = clGray ColorBackGround = clBackground LedColorLine = clBlack LedState = stOn LedAlign = alLeft LedCircle = 10 LedBorder = olNone Border = olNone Transparant = True BorderLine = clBlack LedSpotColorOn = clWhite LedSpotColorOff = clWhite ParentShowHint = False ShowHint = True end object LedBusy: KrLed Left = 584 Top = 5 Width = 20 Height = 10 Hint = 'Just a LED' About = 'Kr Led, version 1.00, 04-10-97' CaptionAlign = caLeft CaptionBorder = olNone CaptionLineColor = clBlack CaptionBackGround = clSilver LedOnColor = clRed LedOffColor = clGray ColorBackGround = clBtnFace LedColorLine = clBlack LedState = stOff LedAlign = alLeft LedCircle = 10 LedBorder = olNone Border = olNone Transparant = True BorderLine = clBlack LedSpotColorOn = clWhite LedSpotColorOff = clWhite ParentShowHint = False ShowHint = True end object Gauge1: TGauge Left = 484 Top = 3 Width = 73 Height = 15 ShowText = False Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] BorderStyle = bsNone ForeColor = clYellow BackColor = clBtnFace ParentFont = False Progress = 50 end end object SplitterWnd1: TSplitterWnd Left = 0 Top = 33 Width = 621 Height = 373 Cursor = crHSplit Orientation = swVertical Thickness = 3 CursorHorz = crVSplit CursorVert = crHSplit BarStyle = sbCheckered Align = alClient BevelOuter = bvNone TabOrder = 1 object Pane1: TPane Left = 0 Top = 0 Width = 180 Height = 373 BorderStyle = bsNone TabOrder = 0 SplitterWnd = SplitterWnd1 PaneIndex = 0 PaneSize = 181 object SplitterWnd2: TSplitterWnd Left = 0 Top = 0 Width = 180 Height = 373 Cursor = crVSplit Orientation = swHorizontal Thickness = 3 CursorHorz = crVSplit CursorVert = crHSplit BarStyle = sbCheckered Align = alClient BevelOuter = bvNone TabOrder = 0 object Pane3: TPane Left = 0 Top = 0 Width = 180 Height = 177 TabOrder = 0 SplitterWnd = SplitterWnd2 PaneIndex = 0 PaneSize = 178 object PTShellTree1: TPTShellTree Left = 0 Top = 0 Width = 176 Height = 173 ShellList = PTShellList1 Options = [ptstoAutoFill, ptstoVirtualFolders, ptstoDefaultKeyHandling, ptstoContextMenus, ptstoDynamicRefresh, ptstoShowHidden] ShowRoot = False DragMode = dmAutomatic HideSelection = False Indent = 19 Align = alClient Font.Color = clWindowText Font.Height = -12 Font.Name = 'ms sans serif' Font.Style = [] ParentColor = False ParentCtl3D = False Ctl3D = True TabOrder = 0 ParentFont = False end end object Pane4: TPane Left = 0 Top = 180 Width = 180 Height = 193 TabOrder = 1 SplitterWnd = SplitterWnd2 PaneIndex = 1 PaneSize = 195 object PTShellList1: TPTShellList Left = 0 Top = 0 Width = 176 Height = 189 Options = [ptsloAutoFill, ptsloNonFilesystemAncestors, ptsloDefaultKeyHandling, ptsloContextMenus, ptsloDynamicRefresh, ptsloOleDrag, ptsloFolderContextMenu, ptsloShowHidden] Align = alClient ReadOnly = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] HideSelection = False IconOptions.AutoArrange = True MultiSelect = True ShowColumnHeaders = False TabOrder = 0 ViewStyle = vsSmallIcon end end end end object Pane2: TPane Left = 183 Top = 0 Width = 438 Height = 373 TabOrder = 1 SplitterWnd = SplitterWnd1 PaneIndex = 1 PaneSize = 440 object NoBDEResizerPanel1: TNoBDEResizerPanel Left = 0 Top = 0 Width = 434 Height = 369 Align = alClient Caption = 'NoBDEResizerPanel1' TabOrder = 0 Active = True object Panel2: TPanel Left = 1 Top = 50 Width = 432 Height = 318 BevelOuter = bvNone TabOrder = 0 object ButtHelp: TExplorerButton Left = 6 Top = 35 Width = 59 Height = 43 Bitmap.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888887778888888800008888 8888600788888888000088888888E60788888888000088888888EE6888888888 000088888888877788888888000088888888600788888888000088888888E607 78888888000088888888E660778888880000888888888E660778888800008888 888878E660778888000088888880778E660788880000888888660778E6078888 0000888888E66077E608888800008888888E660066688888000088888888E666 6E8888880000888888888EEEE888888800008888888888888888888800008888 88888888888888880000} Caption = '&Help' Options = [boMonoDisplay, boPopupMark, boShowBevel] Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] OnClick = ButHelpClick ParentFont = False IBitmap = { 424DE60400000000000036000000280000001400000014000000010018000000 0000B004000000000000000000000000000000000000C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0FFFFFFFFFFFFFFFFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0FFFFFF000000000000FFFFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFF FFFFFFFF000000FFFFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFFFFFFF FFFFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFFFFFFFFF FFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFF000000000000FFFFFFC0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFFFFFFF000000FFFFFFFFFFFFC0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFC0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFC0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0FFFFFFC0C0C0FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFC0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000FFFF FFFFFFFFC0C0C0FFFFFFFFFFFFFFFFFF000000FFFFFFC0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFFFFFFF000000FFFFFF FFFFFFC0C0C0FFFFFFFFFFFF000000FFFFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFFFFFFFFFFFFF000000FFFFFFFF FFFFFFFFFFFFFFFF000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFFFFFFFFFFFFF000000000000FFFF FFFFFFFFFFFFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFFFFFFFFFFFFFFFFFFFC0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0} end object RemoveALL: TExplorerButton Left = 6 Top = 103 Width = 59 Height = 34 Hint = 'Clear List' Bitmap.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD80000008DDDDDDDD077777700DD DDDDD0777777080DDDDDD80777770880DDDDDD07F7F7F0880DDDDDD07F7F7F08 80DDDDDD07F7F7F0888DDDDDD07F7F7F080DDDDDDD07F7F7F80DDDDDDDD07F7F 770DDDDDDDDD8000088DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD} Caption = '&Clear' Enabled = False Options = [boMonoDisplay, boPopupMark, boShowBevel] Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] OnClick = RemoveALLClick ParentFont = False ParentShowHint = False ShowHint = True IBitmap = { 424D360300000000000036000000280000001000000010000000010018000000 00000003000000000000000000000000000000000000FF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FFFFFFFF000000000000000000000000000000000000FFFF FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000FFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000 00FFFFFF000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFFFFFF000000FF FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF000000FF00FFFF00FF FF00FFFF00FFFF00FFFF00FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FF000000FFFFFFFFFFFF000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF000000 FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000FFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFF00FFFF00FFFF00FFFF00FFFF 00FFFF00FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFF 000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000FFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF00FFFF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFFFF FF000000000000000000000000FFFFFFFFFFFFFF00FFFF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF} end object LabelPassword: TLabel Left = 8 Top = 8 Width = 63 Height = 16 Caption = 'Password:' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Visible = False end object Add: TExplorerButton Left = 6 Top = 158 Width = 59 Height = 35 Hint = 'Add a file to the list' Bitmap.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7000777777077777700077777700777770007777770607777000770000066077 7000770666666607700077066666666070007706666666077000770000066077 7000777777060777700077777700777770007777770777777000777777777777 7000} Caption = '&Add' Options = [boMonoDisplay, boPopupMark, boShowBevel] Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] OnClick = AddClick ParentFont = False ParentShowHint = False ShowHint = True IBitmap = { 424D3E0200000000000036000000280000000D0000000D000000010018000000 00000802000000000000000000000000000000000000C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000000000C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 000000FFFFFF000000C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C000000000 0000000000000000000000FFFFFFFFFFFF000000C0C0C0C0C0C0C0C0C000C0C0 C0C0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000C0 C0C0C0C0C000C0C0C0C0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFF000000C0C0C000C0C0C0C0C0C0000000FFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFF000000C0C0C0C0C0C000C0C0C0C0C0C000000000 0000000000000000000000FFFFFFFFFFFF000000C0C0C0C0C0C0C0C0C000C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000FFFFFF000000C0C0C0C0C0C0C0 C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000000000C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000} end object Remove: TExplorerButton Left = 6 Top = 246 Width = 59 Height = 35 Hint = 'Remove a File from the list' Bitmap.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7000777777077777700077777007777770007777060777777000777066000007 7000770666666607700070666666660770007706666666077000777066000007 7000777706077777700077777007777770007777770777777000777777777777 7000} Caption = '&Remove' Enabled = False Options = [boMonoDisplay, boPopupMark, boShowBevel] Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] OnClick = RemoveClick ParentFont = False ParentShowHint = False ShowHint = True IBitmap = { 424D3E0200000000000036000000280000000D0000000D000000010018000000 00000802000000000000000000000000000000000000C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000000000C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0000000FFFFFF 000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C000 0000FFFFFFFFFFFF000000000000000000000000000000C0C0C0C0C0C000C0C0 C0C0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000C0 C0C0C0C0C000C0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFF000000C0C0C0C0C0C000C0C0C0C0C0C0000000FFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFF000000C0C0C0C0C0C000C0C0C0C0C0C0C0C0C000 0000FFFFFFFFFFFF000000000000000000000000000000C0C0C0C0C0C000C0C0 C0C0C0C0C0C0C0C0C0C0000000FFFFFF000000C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000000000C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000} end object AddALL: TExplorerButton Left = 6 Top = 198 Width = 59 Height = 35 Hint = 'Add ALL files to the list' Bitmap.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7000777707707777700077770070077770007777060060777000000006606607 7000066666660660700006666666606600000666666606607000000006606607 7000777706006077700077770070077770007777077077777000777777777777 7000} Caption = 'Add A&ll' Options = [boMonoDisplay, boPopupMark, boShowBevel] Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] OnClick = AddALLClick ParentFont = False ParentShowHint = False ShowHint = True IBitmap = { 424D3E0200000000000036000000280000000D0000000D000000010018000000 00000802000000000000000000000000000000000000C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0000000C0C0C0C0C0C0000000C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000000000C0C0C00000000000 00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000FFFFFF 000000000000FFFFFF000000C0C0C0C0C0C0C0C0C0C000000000000000000000 0000000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000C0C0C0C0C0C0FF0000 00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF00 0000C0C0C0FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FF000000FFFFFFFFFFFF000000FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFF000000FFFFFFFFFFFF000000C0C0C00000000000000000000000 0000000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000C0C0C0C0C0C000C0C0 C0C0C0C0C0C0C0C0C0C0000000FFFFFF000000000000FFFFFF000000C0C0C0C0 C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0000000000000C0C0C00000000000 00C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0000000C0C0C0 C0C0C0000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000} end object Label1: TLabel Left = 216 Top = 292 Width = 121 Height = 16 Caption = 'Select files and click' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object files: TListView Left = 72 Top = 32 Width = 361 Height = 249 Columns = <> ReadOnly = True Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] IconOptions.AutoArrange = True MultiSelect = True TabOrder = 0 ViewStyle = vsReport end object RadioEncrypt: TRadioButton Left = 72 Top = 8 Width = 81 Height = 17 Caption = '&Encrypt' Checked = True Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 TabStop = True OnClick = RadioEncryptClick end object RadioDecrypt: TRadioButton Left = 192 Top = 8 Width = 81 Height = 17 Caption = '&Decrypt' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = RadioEncryptClick end object RadioWipe: TRadioButton Left = 336 Top = 8 Width = 81 Height = 17 Caption = '&Wipe' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = RadioEncryptClick end object Password1: TEdit Left = 72 Top = 6 Width = 361 Height = 24 Color = clWhite Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 56 ParentFont = False PasswordChar = '*' TabOrder = 4 Visible = False OnKeyUp = Password1KeyUp end object ButtonMEMOPASS: TButton Left = 6 Top = 290 Width = 89 Height = 23 Caption = 'MEMOPASS' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = ButtonMEMOPASSClick end object ButtOk: TButton Left = 352 Top = 288 Width = 75 Height = 23 Caption = 'OK' TabOrder = 6 OnClick = ButtOkClick end end object Panel3: TPanel Left = 1 Top = 1 Width = 432 Height = 49 Align = alTop BevelOuter = bvNone Caption = 'Panel3' Color = clMaroon TabOrder = 1 object Image1: TImage Left = 0 Top = 0 Width = 432 Height = 49 Align = alClient Picture.Data = {} Stretch = True end object UrlPepSoft: TUrlLabel Left = 4 Top = 25 Width = 103 Height = 13 Cursor = 5 Hint = 'Click here to connect PEPSOFT site' Caption = 'http://PEPSOFT.com' Color = clBlack Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentColor = False ParentFont = False ParentShowHint = False ShowHint = True URL = 'http://www.pepsoft.com/index.html' end end end end end object PTGroup1: TPTGroup Left = 0 Top = 0 Width = 621 Height = 33 FrameStyle = ptfsHorzLine Align = alTop object DetailsBtn: TSpeedButton Tag = 3 Left = 330 Top = 3 Width = 23 Height = 22 GroupIndex = 1 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222 22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222 22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222 22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222 22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222 22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222 22222FFFFFFFFFFFFFFF44444444444444448888888888888888222222222222 22222222FFFF2FFF2FFF22200002000200022228888288828882222222222222 2222222222222222222222222222222222222222222222222222} NumGlyphs = 2 OnClick = DetailsBtnClick end object ListBtn: TSpeedButton Tag = 2 Left = 307 Top = 3 Width = 23 Height = 22 GroupIndex = 1 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222 22222FFF22222FFF22224442222244422222888F2FFF888F2FFF4F4200024F42 00028F8288828F82888244222222442222228822222288222222222222222222 2222222222222222222222222222222222222FFF22222FFF2222444222224442 2222888F2FFF888F2FFF4F4200024F4200028F8288828F828882442222224422 2222882222228822222222222222222222222222222222222222222222222222 22222FFF22222FFF22224442222244422222888F2FFF888F2FFF4F4200024F42 00028F8288828F82888244222222442222228822222288222222222222222222 2222222222222222222222222222222222222222222222222222} NumGlyphs = 2 OnClick = ListBtnClick end object SmallIconsBtn: TSpeedButton Tag = 1 Left = 284 Top = 3 Width = 23 Height = 22 GroupIndex = 1 Down = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222 22222222FFF2222222222224442222222222222888F2FFF222222224F4200022 22222228F8288822222222244222222222222228822222222222222222222222 222222222222222222222222222222222222222222222FFF2222222222224442 222222222222888F2FFF222222224F420002222222228F828882222222224422 2222222222228822222222222222222222222222222222222222222222222222 222222FFF2222222222224442222222222222888F2FFF222222224F420002222 222228F828882222222224422222222222222882222222222222222222222222 2222222222222222222222222222222222222222222222222222} NumGlyphs = 2 OnClick = SmallIconsBtnClick end object LargeIconsBtn: TSpeedButton Left = 589 Top = 3 Width = 23 Height = 22 GroupIndex = 1 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222 22222222222222FFFFFF22222222200000022222222228888882222222222222 222222222222222FFFF2222222222244442222222222228888F222222222224F F42222222222228F28F222222222224FF42222222222228F28F222222222224F 442222FFFFFF228F882220000002224442222888888222888222222222222222 2222222FFFF2222222222244442222222222228888F222222222224FF4222222 2222228F28F222222222224FF42222222222228F28F222222222224F44222222 2222228F88222222222222444222222222222288822222222222222222222222 2222222222222222222222222222222222222222222222222222} NumGlyphs = 2 Visible = False end object UpOneLevelBtn: TSpeedButton Left = 212 Top = 3 Width = 23 Height = 22 Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222 2222222222222222222200000000000000020FBFBFBFBFBFBF020BFBFBFBFBFB FB020FBFB000000FBF020BFBF0FBFBFBFB020FBFB0BFBFBFBF020BF00000FBFB FB020FBF000FBFBFBF020BFBF0FBFBFBFB020FBFBFBFBFBFBF02000000000000 002220BFBFB02222222222000002222222222222222222222222} OnClick = UpOneLevelBtnClick end object DeleteBtn: TSpeedButton Left = 244 Top = 3 Width = 23 Height = 22 Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDDD0DDDDDDDDDD0DDD000DDDDDDDDDDDDD0000DDDDDD D0DDDDD000DDDDDD0DDDDDDD000DDDD00DDDDDDDD000DD00DDDDDDDDDD00000D DDDDDDDDDDD000DDDDDDDDDDDD00000DDDDDDDDDD000DD00DDDDDDD0000DDDD0 0DDDDD0000DDDDDD00DDDD000DDDDDDDDD0DDDDDDDDDDDDDDDDD} OnClick = DeleteBtnClick end object Label2: TLabel Left = 360 Top = 8 Width = 44 Height = 13 Caption = 'File Filter:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Gauge2: TGauge Left = 465 Top = 25 Width = 151 Height = 5 ShowText = False ForeColor = clRed BackColor = clGreen MaxValue = 30 Progress = 6 end object ButRegister: TExplorerButton Left = 465 Top = 4 Width = 147 Height = 21 Bitmap.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDD 00DDDDD00DDDDD000000DDDD070000070DDDDD000000DDD0707777700DDDDD00 0000DD077777777770DDDD000000DD07777777777F0DDD000000D07777777777 700DDD000000D0777777777777700D000000D0777777777777770D000000D077 00777770F7770D000000DD07FF00077F7700DD000000DDD007FFF77770DDDD00 0000DDDDD00000700DDDDD000000DDDDDDDDDD00DDDDDD000000DDDDDDDDDDD0 DDDDDD000000DDDDDDDDDDDDDDDDDD000000} Caption = 'Click Here to &Order' Layout = blBitmapLeft Options = [boMonoDisplay, boPopupMark, boShowBevel] Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] OnClick = ButRegisterClick ParentFont = False ParentShowHint = False ShowHint = True IBitmap = { 424D260400000000000036000000280000001200000012000000010018000000 0000F003000000000000000000000000000000000000FF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FFFF00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00FFFF00 FFFF00FFFF00FFFF00FF000000000000FF00FFFF00FFFF00FFFF00FFFF00FF00 0000000000FF00FFFF00FFFF00FFFF00FFFF00FF00FFFF00FFFF00FFFF00FFFF 00FF000000FFFFFF000000000000000000000000000000FFFFFF000000FF00FF FF00FFFF00FFFF00FFFF00FF00FFFF00FFFF00FFFF00FF000000FFFFFF000000 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FF00FFFF00FFFF00FFFF00 FFFF00FF0000FF00FFFF00FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFF000000FF00FFFF00FFFF00FFFF00FF0000FF00 FFFF00FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFF000000FF00FFFF00FFFF00FF0000FF00FF000000FFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000 000000FF00FFFF00FFFF00FF0000FF00FF000000FFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000 00FF00FF0000FF00FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF00FF0000FF00 FF000000FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00 0000FFFFFFFFFFFFFFFFFFFFFFFF000000FF00FF0000FF00FFFF00FF000000FF FFFFFFFFFFFFFFFF000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 000000000000FF00FFFF00FF0000FF00FFFF00FFFF00FF000000000000FFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF00FFFF00FFFF00 FFFF00FF0000FF00FFFF00FFFF00FFFF00FFFF00FF0000000000000000000000 00000000FFFFFF000000000000FF00FFFF00FFFF00FFFF00FFFF00FF0000FF00 FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000 0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000FF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000FF00FFFF00FF FF00FFFF00FFFF00FFFF00FF0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FF0000} end object PTShellCombo1: TPTShellCombo Left = 0 Top = 2 Width = 205 Height = 22 ShellTree = PTShellTree1 DropDownCount = 16 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 end object EditMask: THistoryComboBox Left = 406 Top = 2 Width = 57 Height = 24 Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 16 MaxLength = 5 ParentFont = False TabOrder = 1 Text = '*.*' OnChange = EditMaskChange OnExit = EditMaskExit Key = 'Software\Pepsoft\EmailZIP\ListMasks' MaxHistoryLength = 10 end end object LockManager1: TLockManager DateTamperCheck = dcEnforced StopIfNoRegCode = False SignatureLocation = slWindowsDir SignatureFileName = 'PGNLIBC.DLL' AllowMultipleInstances = False ResetSignatureIfDelphiIsRunning = False CopyProtectionType = ptNone TrialPeriodTimeEnabled = True TrialMaxNumberOfRuns = 15 MsgUnRegisteredCopy.Strings = ( 'The software has detected that it was not installed from the ins' + 'tallation disks. Please use the installation disk to properly se' + 't-up the application. If this does not correct the situation ple' + 'ase communicate with us.') MsgEndOfTrial.Strings = ( 'The trial period of Absolute Security is over. Please register y' + 'our copy.') MsgDateTamper.Strings = ( 'Absolute Security has detected that the system date and time we' + 're set before the time of its last use. If your trial period is ' + 'over please contact us to register your copy.') PasswordEnabled = False Password = 'Wapiti138' TerminateIfSignatureEmpty = True OnTerminate = LockManager1Terminate Left = 8 Top = 8 end object TimerRegister: TTimer Enabled = False Interval = 15000 OnTimer = TimerRegisterTimer Left = 32 Top = 8 end object FnpFormEnh1: TFnpFormEnh SavePosition = True SubKey = 'Software\Pepsoft\AbSec' Left = 119 Top = 8 end object FileIterator1: TFileIterator Options = [fiPath, fiDetails, fiRecurseFolders] RootFolder = 'C:' OnAddFile = FileIterator1AddFile OnAddFileQuery = FileIterator1AddFileQuery Left = 127 Top = 40 end object Compress1: TCompress RegName = 'Gregory Noe' RegNumber = 11359 OnCheckFile = Compress1CheckFile OnShowProgress = Compress1ShowProgress MakeDirectories = False ExceptionOnFileError = True Key = 0 CheckSpaceBeforeExpand = False Left = 95 Top = 40 end object WinRoller1: TWinRoller Enabled = True Left = 191 Top = 8 end object MSOfficeCaption1: TMSOfficeCaption AppNameText.Caption = 'Absolute Security' AppNameText.FontKind = fkSystemB AppNameText.Visible = True CaptionText.Caption = '* Unregistered *' CaptionText.FontKind = fkSystemI CaptionText.Visible = True CompanyText.Caption = 'PEPSOFT' CompanyText.FontKind = fkSystemBI CompanyText.Visible = True Left = 168 Top = 40 end object Encrypt1: TEncrypt OnProgressChange = Encrypt1ProgressChange Left = 391 Top = 8 end object SysInfo321: TSysInfo32 MemoryAvailPhys = 5652480 MemoryAvailVirtual = 2106130432 MemoryTotalPhys = 66564096 MemoryTotalVirtual = 2143289344 OSBuild = '950' OSPlatform = 'Windows 95' OSVersion = '4.0' ProcessorType = 'Intel' ProcessorLevel = 'Pentium' ProductID = '27207-040-0359396-38354' RegisteredOwner = 'Greg' Left = 247 Top = 16 end object ZipMaster1: TZipMaster Verbose = False Trace = False AddCompLevel = 9 AddOptions = [] ExtrOptions = [] Left = 335 Top = 16 end object CliSocket: TWSocket Proto = 'tcp' MultiThreaded = False FlushTimeout = 60 SendFlags = wsSendNormal Left = 359 Top = 24 end object DragDrop1: TDragDrop Active = False BringToFront = False OnFilesDropped = DragDrop1FilesDropped Left = 88 Top = 10 end object Timer1: TTimer Interval = 5000 OnTimer = Timer1Timer Left = 72 Top = 18 end end