Revista CD Expert 8/Revista CD Expert nº 08 CD1.iso/Utilitarios/Seguranca/Secur-all/sec32380.exe/%MAINDIR%/Securi32.exe/0/RCDATA/TFRMSECURITY/TFRMSECURITY.txt

Text File | 1998-08-03 | 27.9 KB | 942 lines

object frmSecurity: TfrmSecurity
  Left = 196
  Top = 108
  ActiveControl = tvuPC
  AutoScroll = False
  ClientHeight = 394
  ClientWidth = 600
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = mnuMain
  Scaled = False
  ShowHint = True
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object pnlTVUBack: TPanel
    Left = 0
    Top = 29
    Width = 168
    Height = 344
    Align = alLeft
    BevelOuter = bvNone
    Caption = 'pnlTVUBack'
    Locked = True
    TabOrder = 2
    object pnlTVU: TPanel
      Left = 0
      Top = 0
      Width = 168
      Height = 24
      Align = alTop
      Alignment = taLeftJustify
      BevelInner = bvLowered
      BevelOuter = bvNone
      BorderWidth = 1
      Caption = ' All folders'
      TabOrder = 0
    end
    object tvuPC: TiPCView
      Left = 0
      Top = 24
      Width = 168
      Height = 320
      ShowRoot = False
      ReadOnly = True
      Indent = 19
      OnChanging = tvuPCChanging
      OnChange = tvuPCChange
      Align = alClient
      ParentColor = False
      TabOrder = 1
      OnClick = tvuPCClick
      Images = tvuPC.
      cboDrive = cboDrives
      FileView = lvuFiles
      DirLabel = lblFolder
      LabelCurDir = True
      TextCase = tiSmartCase
      DiskCase = tiUpperCase
    end
  end
  object pnlToolbar: tipanel
    Left = 0
    Top = 0
    Width = 600
    Height = 29
    bevelsides = [sdtop]
    bordersides = []
    align = alTop
    bevelinner = bvRaised
    bevelouter = bvLowered
    taborder = 0
    object btnLock: TSpeedButton
      Left = 214
      Top = 4
      Width = 77
      Height = 24
      Caption = 'Lock'
      Enabled = False
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666000000000
        0066660BBBBBBBBBBB066608888808888806660BBBBB0BBBBB06660888880888
        8806660BBBB000BBBB066608888000888806660BBBBBBBBBBB06666000000000
        006666660B06660B066666660B06660B066666660B06660B066666660BB000BB
        0666666660BBBBB0666666666600000666666666666666666666}
      OnClick = ActionsLock
    end
    object btnUnlock: TSpeedButton
      Left = 291
      Top = 4
      Width = 77
      Height = 24
      Caption = 'Unlock'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777000000000
        0077770FBBBBBBBBBB077707888808888807770FBBBB0BBBBB07770788880888
        8807770FBBB000BBBB077707888000888807F70FBBBBBBBBBB077F7000000000
        007777FFFF77770B0777FFFF808FF70B077777FF0B07770B07777F7F0B07770B
        0777F77F0BB000BB0777777F70BBBBB07777777F770000077777}
      OnClick = ActionsUnlock
    end
    object btnEncrypt: TSpeedButton
      Left = 368
      Top = 4
      Width = 77
      Height = 24
      Caption = 'Encrypt'
      Enabled = False
      Glyph.Data = {
        90010000424D9001000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333999993333333333388888FFF333333999999999
        3333333888333888FF3333999999999993333388333333388FF3399999999999
        993338833333333388F3399999999999993338F33FFFFFFFF8FF999999999999
        999388F388888888F88F999FFFFFFFFF999388F383333338F88F999FFFFFFFFF
        999388F38FFFFFF8F88F999FFFFFFFFF999388F388888888388F999999999999
        999388FF3333333338833999999999999933383FF333333338F3399999999999
        99333883FF3333338833339999999999933333883FFFFFF88333333999999999
        3333333888333888333333333999993333333333388888333333000000000000
        0000000000000000000000000000000000000000}
      NumGlyphs = 2
      OnClick = ActionsEncrypt
    end
    object btnDecrypt: TSpeedButton
      Left = 445
      Top = 4
      Width = 77
      Height = 24
      Caption = 'Decrypt'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00770000000000
        00077787777777777707778FFFFFFFFFF707778FFFFFFFFFF707778FF0087F70
        F707778F0F700000F707778FFCC0C0B0F707778FCF700000F707778FF9909020
        F707778F9FFF000FF707778FFFFFFFFFF707778FFFFFFFFFF707778FFFFFFFF0
        0007778FFFFFFFF7F877778FFFFFFFF787777788888888887777}
      OnClick = ActionsDecrypt
    end
    object btnShred: TSpeedButton
      Left = 522
      Top = 4
      Width = 77
      Height = 24
      Caption = 'Shred'
      Enabled = False
      Glyph.Data = {
        10010000424D1001000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700077000770007770FF070FF070FF0770FF070FF070FF070FF070FF070F
        F0770FF070FF070FF0770FF070FF070FF07770FF070FF070FF0770FF070FF070
        FF0770FF070FF070FF070FF070FF070FF0770FF070FF070FF0770FF070FF070F
        F07770FF070FF070FF0777000770007700077777777777777777000000000000
        0000000000000000000000000000000000000000}
      OnClick = ActionsShred
    end
    object cboDrives: TiDriveComboBox
      Left = 2
      Top = 4
      Width = 205
      Height = 22
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 16
      ParentFont = False
      PCView = tvuPC
      TabOrder = 0
    end
  end
  object pnlStatusBar: TRzPanel
    Left = 0
    Top = 373
    Width = 600
    Height = 21
    BorderSides = []
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object statMsg1: TRzStatusControl
      Left = 0
      Top = 0
      Width = 136
      Height = 21
      Align = alLeft
      Caption = 'statMsg1'
    end
    object statMsg2: TRzStatusControl
      Left = 136
      Top = 0
      Width = 136
      Height = 21
      Align = alLeft
      Caption = 'statMsg2'
    end
    object statMsg3: TRzStatusControl
      Left = 272
      Top = 0
      Width = 303
      Height = 21
      Align = alClient
      Caption = 'statMsg3'
    end
    object pnlResizerBack: TRzPanel
      Left = 575
      Top = 0
      Width = 25
      Height = 21
      BorderSides = []
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 0
      object RzPanel12: TRzPanel
        Left = 0
        Top = 19
        Width = 25
        Height = 2
        BorderSides = []
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 0
      end
      object statResizer: TStatusBar
        Left = 0
        Top = 0
        Width = 25
        Height = 19
        Align = alClient
        Panels = <>
        SimplePanel = False
      end
    end
    object pnlGaugeBack: tipanel
      Left = 272
      Top = 0
      Width = 303
      Height = 21
      bordersides = []
      align = alClient
      bevelouter = bvNone
      taborder = 1
      object aGauge: TRzProgressBar
        Left = 0
        Top = 0
        Width = 223
        Height = 21
        BackColor = clBtnFace
        BorderStyle = bsStatusControl
        BorderWidth = 2
        Ctl3D = False
        InteriorOffset = 2
        PartsComplete = 0
        Percent = 40
        TotalParts = 0
        Align = alClient
      end
      object iPanel1: tipanel
        Left = 223
        Top = 0
        Width = 80
        Height = 21
        bordersides = []
        align = alRight
        bevelouter = bvNone
        taborder = 0
        object btnCancel: TSpeedButton
          Left = 4
          Top = 2
          Width = 72
          Height = 18
          Caption = 'Stop'
          Glyph.Data = {
            E6000000424DE60000000000000076000000280000000E0000000E0000000100
            0400000000007000000000000000000000000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666660000006
            660066660FFFFFF066006660FFFFFFFF0600660FFFFFFFFF0600660FFFFFFFFF
            060060FF0FFFFFFF06000FF00F0F0F0F060000060F0F0F0F060066660F0F0F0F
            060066660F0F0F0F060066660F0F0F00660066660F0F0F0666006666600F0066
            66006666660066666600}
          OnClick = btnCancelClick
        end
      end
    end
  end
  object pnlSplit: TPanel
    Left = 168
    Top = 29
    Width = 2
    Height = 344
    Cursor = crHSplit
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 3
    OnMouseDown = pnlSplitMouseDown
    OnMouseMove = pnlSplitMouseMove
    OnMouseUp = pnlSplitMouseUp
  end
  object pnlLVUBack: TPanel
    Left = 170
    Top = 29
    Width = 430
    Height = 344
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 4
    object pnlLVUCaptionBack: TPanel
      Left = 0
      Top = 0
      Width = 430
      Height = 24
      Align = alTop
      Alignment = taLeftJustify
      BevelOuter = bvNone
      BorderWidth = 1
      TabOrder = 0
      object pnlLVUCaption: tipanel
        Left = 1
        Top = 1
        Width = 228
        Height = 22
        bordersides = []
        align = alLeft
        alignment = taLeftJustify
        bevelinner = bvLowered
        bevelouter = bvNone
        taborder = 0
        onresize = pnlLVUCaptionResize
        object lblFolder: TLabel
          Left = 4
          Top = 4
          Width = 220
          Height = 13
          AutoSize = False
          Caption = 'D:\code32\delphi\security\securall.380'
          Transparent = True
        end
      end
      object pnlFileViewStyle: tipanel
        Left = 333
        Top = 1
        Width = 96
        Height = 22
        bordersides = []
        align = alLeft
        bevelouter = bvNone
        taborder = 1
        object btnLargeIcons: TSpeedButton
          Left = 8
          Top = 0
          Width = 22
          Height = 22
          Hint = 'Large Icons'
          GroupIndex = 1
          Down = True
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            0400000000008000000000000000000000000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
            777777777777700000077777777777777777777777777744447777777777774F
            F47777777777774FF47777777777774F44777000000777444777777777777777
            77777744447777777777774FF47777777777774FF47777777777774F44777777
            7777774447777777777777777777777777777777777777777777}
          OnClick = SelectLvuFilesType
        end
        object btnSmallicons: TSpeedButton
          Tag = 1
          Left = 30
          Top = 0
          Width = 22
          Height = 22
          Hint = 'Small Icons'
          GroupIndex = 1
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            0400000000008000000000000000000000000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
            777777744477777777777774F470007777777774477777777777777777777777
            777777777777777777777777777744477777777777774F470007777777774477
            777777777777777777777777777777777777744477777777777774F470007777
            7777744777777777777777777777777777777777777777777777}
          OnClick = SelectLvuFilesType
        end
        object bntList: TSpeedButton
          Tag = 2
          Left = 52
          Top = 0
          Width = 22
          Height = 22
          Hint = 'List'
          GroupIndex = 1
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            0400000000008000000000000000000000000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
            777744477777444777774F4700074F4700074477777744777777777777777777
            7777777777777777777744477777444777774F4700074F470007447777774477
            77777777777777777777777777777777777744477777444777774F4700074F47
            0007447777774477777777777777777777777777777777777777}
          OnClick = SelectLvuFilesType
        end
        object btnDetails: TSpeedButton
          Tag = 3
          Left = 74
          Top = 0
          Width = 22
          Height = 22
          Hint = 'Details'
          GroupIndex = 1
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            0400000000008000000000000000000000000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
            7777477000070007000777777777777777774770000700070007777777777777
            7777477000070007000777777777777777774770000700070007777777777777
            7777477000070007000777777777777777774444444444444444777777777777
            7777777000070007000777777777777777777777777777777777}
          OnClick = SelectLvuFilesType
        end
      end
      object pnlSelect: tipanel
        Left = 281
        Top = 1
        Width = 52
        Height = 22
        bordersides = []
        align = alLeft
        bevelouter = bvNone
        taborder = 2
        object btnSelectAll: TSpeedButton
          Left = 8
          Top = 0
          Width = 22
          Height = 22
          Hint = 'Select All|Select all objects'
          AllowAllUp = True
          Glyph.Data = {
            60010000424D600100000000000076000000280000001C0000000D0000000100
            040000000000D000000000000000000000000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777700000000
            00777F8888888888000077000FFFFFFFF07F888F777777780000000F0FFF2FFF
            F0888F8F7777777800000F0F0FF222FFF08F8F8F7777777800000F0F0F22F22F
            F08F8F8F7777777800000F0F0F2FFF22F08F8F8F7777777800000F0F0FFFFFF2
            208F8F8F77777FF800000F0F0FFFFF00208F8F8F7777888800000F0F0FFFFF0F
            078F8F8F77778F8700000F0F0FFFFF00778F8F8FFFFF887700000F0F00000007
            778F8F888888877700000F0000000777778F8888888777770000000000077777
            7788888887777777000000000000000000000000000000000000000000000000
            00000000}
          NumGlyphs = 2
          OnClick = btnSelectAllClick
        end
        object btnSelectNone: TSpeedButton
          Left = 30
          Top = 0
          Width = 22
          Height = 22
          Hint = 'Select None|Deselect all objects'
          AllowAllUp = True
          Glyph.Data = {
            60010000424D600100000000000076000000280000001C0000000D0000000100
            040000000000D000000000000000000000000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777700000000
            00777F8888888888000077000FFFFFFFF07F888F777777780000000F0F1FFF1F
            F0888F8F7777777800000F0F0F11F11FF08F8F8F7777777800000F0F0FF111FF
            F08F8F8F7777777800000F0F0FF111FFF08F8F8F7777777800000F0F0F11F11F
            F08F8F8F77777FF800000F0F0F1FFF10008F8F8F7777888800000F0F0FFFFF0F
            078F8F8F77778F8700000F0F0FFFFF00778F8F8FFFFF887700000F0F00000007
            778F8F888888877700000F0000000777778F8888888777770000000000077777
            7788888887777777000000000000000000000000000000000000000000000000
            00000000}
          NumGlyphs = 2
          OnClick = btnSelectNoneClick
        end
      end
      object iPanel2: tipanel
        Left = 229
        Top = 1
        Width = 52
        Height = 22
        bordersides = []
        align = alLeft
        bevelouter = bvNone
        taborder = 3
        object btnPrefs: TSpeedButton
          Left = 8
          Top = 0
          Width = 22
          Height = 22
          Hint = 'Preferences|Change settings for this application'
          AllowAllUp = True
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            0400000000008000000000000000000000000000000010000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
            777700000000000077770FFFFFFFFFF077770F00F00000F077770FFFFFFFFFF0
            77770F00F00000F077770FFFFFFFFFF077770FFFFFFF0FF077770F00FFF070F0
            77770F070F07070007440FF07070707770440000070707777744777770707777
            7744777777077777704477777770000007447777777777777777}
          OnClick = mnuOptionsPreferencesClick
        end
        object btnUsers: TSpeedButton
          Left = 30
          Top = 0
          Width = 22
          Height = 22
          Hint = 'Users|Change user settings'
          AllowAllUp = True
          Glyph.Data = {
            10010000424D1001000000000000760000002800000010000000100000000100
            0400000000008000000000000000000000000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777700000
            00077777770F3F3F3F307000000003F3F3F00FFFFFFFF03F00000FFFFFFFF0F0
            F3F00FFFF000003F3F300FFF0FFFF0F3F3F00FFFFFFFF0300F300FFFFFFFF0F0
            03F00FFFF00FF03F3F300FFFF00FF0F3F3F00FFFFFFFF03F3F070FFFFFFFF000
            00770FFFFFFF0777777770000000777777777777777777777777000000000000
            0000000000000000000000000000000000000000}
          OnClick = mnuOptionsUsersClick
        end
      end
    end
    object lvuFiles: TiFileView
      Left = 0
      Top = 24
      Width = 430
      Height = 320
      Align = alClient
      OnClick = lvuFilesClick
      OnDblClick = lvuFilesDblClick
      Columns = <
        item
          Caption = 'Name'
          Width = 120
        end
        item
          Alignment = taRightJustify
          Caption = 'Size'
          Width = 64
        end
        item
          Caption = 'Type'
          Width = 112
        end
        item
          Caption = 'Modified'
          Width = 112
        end>
      ReadOnly = True
      IconOptions.AutoArrange = True
      AllocBy = 500
      MultiSelect = True
      OnColumnClick = lvuFilesColumnClick
      OnMouseDown = lvuFilesMouseDown
      OnMouseUp = lvuFilesMouseUp
      PopupMenu = mnuPopup
      TabOrder = 1
      ViewStyle = vsReport
      OnKeyUp = lvuFilesKeyUp
      LargeImages = lvuFiles.
      SmallImages = lvuFiles.
      FileType = [ftReadOnly, ftHidden, ftSystem, ftVolumeID, ftDirectory, ftArchive, ftNormal]
      SortBy = sbNameAsc
    end
  end
  object mnuMain: TMainMenu
    Left = 8
    Top = 92
    object mnuFile: TMenuItem
      Caption = '&File'
      ShortCut = 0
      object mnuFileOpen: TMenuItem
        Caption = '&Open'
        Enabled = False
        ShortCut = 0
        OnClick = FileOpen
      end
      object mnuFileExit: TMenuItem
        Caption = 'E&xit'
        Hint = 'Closes this application'
        ShortCut = 0
        OnClick = mnuFileExitClick
      end
    end
    object mnuEdit: TMenuItem
      Caption = '&Edit'
      ShortCut = 0
      object mnuEditSelectAll: TMenuItem
        Caption = 'Select &All'
        Hint = 'Select all objects'
        ShortCut = 16449
        OnClick = mnuEditSelectAllClick
      end
      object mnuEditSelectNone: TMenuItem
        Caption = 'Select &None'
        Hint = 'Deselect all objects'
        ShortCut = 0
        OnClick = mnuEditSelectNoneClick
      end
      object mnuEditInvertSelection: TMenuItem
        Caption = '&Invert Selection'
        Hint = 'Reverses which items are selected and which are not'
        ShortCut = 0
        OnClick = mnuEditInvertSelectionClick
      end
    end
    object mnuActions: TMenuItem
      Caption = '&Actions'
      ShortCut = 0
      object mnuActionsLock: TMenuItem
        Caption = '&Lock'
        ShortCut = 0
        OnClick = ActionsLock
      end
      object mnuActionsUnlock: TMenuItem
        Caption = '&Unlock'
        ShortCut = 0
        OnClick = ActionsUnlock
      end
      object N4: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuActionsEncrypt: TMenuItem
        Caption = '&Encrypt'
        ShortCut = 0
        OnClick = ActionsEncrypt
      end
      object mnuActionsDecrypt: TMenuItem
        Caption = '&Decrypt'
        ShortCut = 0
        OnClick = ActionsDecrypt
      end
      object N3: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuActionsShred: TMenuItem
        Caption = '&Shred...'
        Enabled = False
        ShortCut = 0
        OnClick = ActionsShred
      end
    end
    object mnuView: TMenuItem
      Caption = '&View'
      ShortCut = 0
      OnClick = mnuViewClick
      object mnuViewToolbar: TMenuItem
        Caption = '&Toolbar'
        Checked = True
        Hint = 'Show or hide the toolbar'
        ShortCut = 0
        OnClick = mnuViewToolbarClick
      end
      object mnuViewDescBar: TMenuItem
        Caption = '&Description Bars'
        Checked = True
        Hint = 'Show or hide the description bars'
        ShortCut = 0
        Visible = False
        OnClick = mnuViewDescBarClick
      end
      object mnuViewStatusbar: TMenuItem
        Caption = '&Statusbar'
        Checked = True
        Hint = 'Show or hide the status bar'
        ShortCut = 0
        OnClick = mnuViewStatusbarClick
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuViewLargeIcons: TMenuItem
        Caption = 'Lar&ge Icons'
        GroupIndex = 1
        Hint = 'Displays items by using large icons'
        RadioItem = True
        ShortCut = 0
        OnClick = SelectLvuFilesType
      end
      object mnuViewSmallIcons: TMenuItem
        Tag = 1
        Caption = 'S&mall Icons'
        GroupIndex = 1
        Hint = 'Displays items by using small icons'
        RadioItem = True
        ShortCut = 0
        OnClick = SelectLvuFilesType
      end
      object mnuViewList: TMenuItem
        Tag = 2
        Caption = '&List'
        GroupIndex = 1
        Hint = 'Displays items in a list'
        RadioItem = True
        ShortCut = 0
        OnClick = SelectLvuFilesType
      end
      object mnuViewDetails: TMenuItem
        Tag = 3
        Caption = '&Details'
        GroupIndex = 1
        Hint = 'Displays information about each item'
        RadioItem = True
        ShortCut = 0
        OnClick = SelectLvuFilesType
      end
      object N9: TMenuItem
        Caption = '-'
        GroupIndex = 2
        ShortCut = 0
      end
      object mnuViewArrange: TMenuItem
        Caption = 'Arrange &Icons'
        GroupIndex = 2
        ShortCut = 0
        object mnuViewArrangeName: TMenuItem
          Caption = 'By &Name'
          ShortCut = 0
          OnClick = mnuViewArrangeNameClick
        end
        object mnuViewArrangeSize: TMenuItem
          Caption = 'By &Size'
          ShortCut = 0
          OnClick = mnuViewArrangeSizeClick
        end
        object mnuViewArrangeType: TMenuItem
          Caption = 'By &Type'
          ShortCut = 0
          OnClick = mnuViewArrangeTypeClick
        end
        object mnuViewArrangeDate: TMenuItem
          Caption = 'By &Date'
          ShortCut = 0
          OnClick = mnuViewArrangeDateClick
        end
      end
      object mnuViewLineUp: TMenuItem
        Caption = 'Lin&e up Icons'
        Enabled = False
        GroupIndex = 2
        ShortCut = 0
        Visible = False
      end
      object N8: TMenuItem
        Caption = '-'
        GroupIndex = 2
        ShortCut = 0
      end
      object mnuViewRefresh: TMenuItem
        Caption = '&Refresh'
        GroupIndex = 3
        Hint = 'Refresh item information'
        ShortCut = 116
        OnClick = mnuViewRefreshClick
      end
    end
    object mnuOptions: TMenuItem
      Caption = '&Options'
      ShortCut = 0
      object mnuOptionsPreferences: TMenuItem
        Caption = '&Preferences'
        Hint = 'Change settings for this application'
        ShortCut = 0
        OnClick = mnuOptionsPreferencesClick
      end
      object mnuOptionsUsers: TMenuItem
        Caption = '&Users'
        Hint = 'Change user settings'
        ShortCut = 0
        OnClick = mnuOptionsUsersClick
      end
    end
    object mnuRegister: TMenuItem
      Caption = '&Purchase'
      ShortCut = 0
      object mnuRegisterOrderForm: TMenuItem
        Caption = '&Order Form...'
        Hint = 'Information about ordering SecuriT32'
        ShortCut = 0
        OnClick = mnuRegisterOrderFormClick
      end
      object mnuRegisterRegistration: TMenuItem
        Caption = '&Registration...'
        Hint = 'Register this application'
        ShortCut = 0
        OnClick = mnuRegisterRegistrationClick
      end
    end
    object mnuHelp: TMenuItem
      Caption = '&Help'
      ShortCut = 0
      object mnuHelpContents: TMenuItem
        Caption = '&Contents'
        Hint = 'Opens Help'
        ShortCut = 112
        OnClick = mnuHelpContentsClick
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuHelpAbout: TMenuItem
        Caption = '&About...'
        Hint = 'About this application'
        ShortCut = 0
        OnClick = mnuHelpAboutClick
      end
    end
    object mnuDebug: TMenuItem
      Caption = '&Debug'
      ShortCut = 0
      object mnuDebugDisplay: TMenuItem
        Caption = 'Display Lock Info'
        ShortCut = 0
        OnClick = mnuDebugDisplayClick
      end
      object mnuDebugSave: TMenuItem
        Caption = 'Save Lock Info'
        ShortCut = 0
        OnClick = mnuDebugSaveClick
      end
    end
  end
  object tmrSecurit: TTimer
    Enabled = False
    Interval = 5000
    OnTimer = tmrSecuritTimer
    Left = 72
    Top = 91
  end
  object AgentEncrypt: TAgent
    Left = 72
    Top = 60
  end
  object AgentDecrypt: TAgent
    Left = 104
    Top = 60
  end
  object AgentLock: TAgent
    Left = 8
    Top = 60
  end
  object AgentUnlock: TAgent
    Left = 40
    Top = 60
  end
  object mnuPopup: TPopupMenu
    Left = 40
    Top = 92
    object mnuPopupOpen: TMenuItem
      Caption = '&Open'
      ShortCut = 0
      OnClick = FileOpen
    end
    object N5: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object mnuPopupLock: TMenuItem
      Caption = '&Lock'
      ShortCut = 0
      OnClick = ActionsLock
    end
    object mnuPopupUnlock: TMenuItem
      Caption = '&Unlock'
      ShortCut = 0
      OnClick = ActionsUnlock
    end
    object N6: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object mnuPopupEncrypt: TMenuItem
      Caption = '&Encrypt'
      ShortCut = 0
      OnClick = ActionsEncrypt
    end
    object mnuPopupDecrypt: TMenuItem
      Caption = '&Decrypt'
      ShortCut = 0
      OnClick = ActionsDecrypt
    end
    object N7: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object mnuPopupShred: TMenuItem
      Caption = '&Shred...'
      ShortCut = 0
      OnClick = ActionsShred
    end
  end
  object AgentShred: TAgent
    Left = 136
    Top = 60
  end
  object AgentOpen: TAgent
    Left = 136
    Top = 93
  end
  object tmrEval: TTimer
    Enabled = False
    Interval = 60000
    OnTimer = tmrEvalTimer
    Left = 104
    Top = 93
  end
  object sharedmm: TSharedMemory
    BlockSize = 2048
    BlockName = 'ssi server shared memory'
    Left = 8
    Top = 125
  end
end