Bila Vrana/BILA_VRANA.iso/026A/CLEANUP1.ZIP/CleanUp.ex_/0/RCDATA/TFORM1/TFORM1.txt

Text File | 1997-02-09 | 21KB | 645 lines

object Form1: TForm1
  Left = 235
  Top = 253
  Width = 549
  Height = 300
  Caption = 'Unregistered'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  Menu = MainMenu1
  Position = poDefault
  ShowHint = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object ListView: TCoolListView
    Left = 0
    Top = 30
    Width = 541
    Height = 205
    Align = alClient
    AutoSort = True
    Columns = <
      item
        Caption = 'Name'
        Width = 140
      end
      item
        Caption = 'Location'
        Width = 170
      end
      item
        Alignment = taRightJustify
        Caption = 'Size'
        Width = 80
      end
      item
        Alignment = taRightJustify
        Caption = 'Date'
        Width = 60
      end
      item
        Alignment = taRightJustify
        Caption = 'Time'
        Width = 60
      end>
    ReadOnly = True
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    IconOptions.AutoArrange = True
    MultiSelect = True
    OnChange = ListViewChange
    OnChanging = ListViewChanging
    SortType = stBoth
    TabOrder = 3
    ViewStyle = vsReport
    OnKeyPress = FormKeyPress
  end
  object LVSetup: TCoolListView
    Left = 0
    Top = 30
    Width = 541
    Height = 205
    Align = alClient
    OnDblClick = LVSetupDblClick
    Columns = <
      item
        Caption = 'Location'
        Width = 200
      end
      item
        Caption = 'File Specs'
        Width = 80
      end
      item
        Alignment = taRightJustify
        Caption = 'File Age'
        Width = 80
      end
      item
        Alignment = taRightJustify
        Caption = 'File Size'
        Width = 80
      end
      item
        Alignment = taCenter
        Caption = 'Include SubDir'
        Width = 88
      end>
    ReadOnly = True
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MultiSelect = True
    TabOrder = 1
    ViewStyle = vsReport
    Visible = False
    OnKeyPress = FormKeyPress
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 541
    Height = 30
    Align = alTop
    TabOrder = 0
    object Bevel3: TBevel
      Left = 139
      Top = 1
      Width = 14
      Height = 28
      Shape = bsLeftLine
    end
    object Bevel1: TBevel
      Left = 83
      Top = 1
      Width = 14
      Height = 28
      Shape = bsLeftLine
    end
    object EBAdd: TExplorerButton
      Left = 112
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Add file|Add file for CleanUp'
      Alignment = taRightJustify
      AllowAllUp = True
      Bitmap.Data = {
        B0010000424DB001000000000000760000002800000018000000180000000100
        0400000000002001000000000000000000000000000000000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333333333333333B3333333B333333
        B33333333B333333B33333333BB33888BB8888BB3333333333B00000000000B3
        333333333330FFFFFFFFF083333333333330FFFFFFFFF083333333333330FFFF
        FFFFF083333333333330FFFFFFFFF083333333333330FFFFFFFFF08333333333
        3BB0FFFFFFFFF0833333333BB330FFFFFFFFF0BB333333333330FFFFFF777033
        BB3333333330FFFFF0000033333333333330FFFFF0FF0333333333333330FFFF
        F0F0B333333333333330FFFFF003BB333333333333B0000000333BB333333333
        3BB33333BB3333BB33333333B3333333B3333333B33333333333333333333333
        3333333333333333333333333333333333333333333333333333000000000000
        0000000000000000000000000000000000000000}
      Caption = 'ExplorerButton'
      Layout = blBitmapLeft
      Options = [boIconOnly, boPopupMark]
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      OnClick = EBAddClick
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      Visible = False
    end
    object Bevel2: TBevel
      Left = 243
      Top = 1
      Width = 14
      Height = 28
      Shape = bsLeftLine
    end
    object EBConfirm: TExplorerButton
      Left = 32
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Confirm Delete|Confirm Delete - Press to toggle'
      AllowAllUp = True
      Bitmap.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDD0000D
        DDDDDDDDDD3BBB30DDDDDDDDDD3BBB30DDDDDDDDDDD33370DDDDDDDDDD00000D
        DDDDDDDDDD3BBB30DDDDDDDDDD3BBB30DDDDDDDDDD3BBB30DDDDDDDDDDD3BBB3
        0DDDDD30000D3BBB30DDDD3BBB300BBB30DDDD3BBB303BBB30DDDD37BBBBBBBB
        30DDDDD37BBBBBB733DDDDDD33FFFF773DDDDDDDDD333333DDDD}
      Caption = 'ExplorerButton'
      Layout = blBitmapLeft
      Options = [boIconOnly, boPopupMark]
      ShadingType = stDark
      OnClick = EBConfirmClick
      ParentShowHint = False
      ShowHint = True
    end
    object EBRecycle: TExplorerButton
      Left = 56
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Use Recycle Bin|Use Recycle Bin - Press to toggle'
      AllowAllUp = True
      Bitmap.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDD000
        0DDDDDDDDDD0077880DDDDDDD007777880DDDDD00772777880DDDDD877222278
        880DDDD872727278880DDD8772777778880DDD8722272278880DDD8772772278
        8880DD877722FFFF8880D87777FF8777FF80D877FF0887777FF0D8FF8808777F
        F880D88FF8077FF88DDDDDD88F8FF88DDDDDDDDDD8888DDDDDDD}
      Caption = 'ExplorerButton'
      Layout = blBitmapLeft
      Options = [boIconOnly, boPopupMark]
      ShadingType = stDark
      OnClick = EBRecycleClick
      ParentShowHint = False
      ShowHint = True
    end
    object EBNotConfirm: TExplorerButton
      Left = 32
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Instant Delete|Instant Delete - Press to toggle'
      AllowAllUp = True
      Bitmap.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDD999999D
        DDDDDDD9999999999DDDDD999D3BBB3999DDD9999DD33370999DD9999900000D
        D99D99DD999BBB30DD9999DDD999BB30DD9999DDDD999B30DD9999DDDDD999B3
        0D999930000D999B3099993BBB3009993099D99BBB303B99999DD999BBBBBBB9
        999DDD999BBBBBB999DDDDD9999999999DDDDDDDD9999993DDDD}
      Caption = 'ExplorerButton'
      Layout = blBitmapLeft
      Options = [boIconOnly, boPopupMark]
      ShadingType = stDark
      OnClick = EBConfirmClick
      ParentShowHint = False
      ShowHint = True
      Visible = False
    end
    object EBNotRecycle: TExplorerButton
      Left = 56
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Do Not Use Recycle Bin|Do Not Use Recycle Bin - Press to toggle'
      AllowAllUp = True
      Bitmap.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDD9999990
        0DDDDDD99999999990DDDD999007777999DDD99997727778999DD99999222278
        899D99D899927278889999877999777888999987229992788899998772799978
        889999877722999F8899997777FF8999FF99D997FF0887999990D99988087779
        9990D89998077FF999DDDDD9999999999DDDDDDDD999999DDDDD}
      Caption = 'Expl