mainform.dfm

nsis是一个流传比较广的程序安装和解安装封装软件

      Flat = True
      OnClick = butOldRemoveClick
    end
    object butNewEdit: TSpeedButton
      Left = 368
      Top = 40
      Width = 49
      Height = 25
      Caption = '&Edit'
      Flat = True
      OnClick = butNewEditClick
    end
    object Label4: TLabel
      Left = 16
      Top = 200
      Width = 176
      Height = 13
      Caption = 'Patch generation configuration'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label5: TLabel
      Left = 32
      Top = 224
      Width = 48
      Height = 13
      Hint = 'Smaller gives smaller patch files, but decreased speed'
      Caption = 'Block size'
    end
    object Label7: TLabel
      Left = 232
      Top = 224
      Width = 61
      Height = 13
      Caption = 'Block divider'
      Visible = False
    end
    object txtStartBlockSize: TLabel
      Left = 136
      Top = 224
      Width = 65
      Height = 17
      Alignment = taCenter
      AutoSize = False
    end
    object txtNew: TEdit
      Left = 32
      Top = 42
      Width = 321
      Height = 21
      ReadOnly = True
      TabOrder = 0
    end
    object lstOld: TListBox
      Left = 32
      Top = 96
      Width = 321
      Height = 89
      ItemHeight = 13
      TabOrder = 1
    end
    object tbBlockSize: TTrackBar
      Left = 200
      Top = 224
      Width = 161
      Height = 25
      Max = 12
      Min = 4
      Position = 6
      TabOrder = 2
      OnChange = tbBlockSizeChange
    end
  end
  object lstNew: TVirtualStringTree
    Left = 24
    Top = 56
    Width = 193
    Height = 265
    Header.AutoSizeIndex = 0
    Header.Font.Charset = DEFAULT_CHARSET
    Header.Font.Color = clWindowText
    Header.Font.Height = -11
    Header.Font.Name = 'MS Sans Serif'
    Header.Font.Style = []
    Header.MainColumn = -1
    Header.Options = [hoColumnResize, hoDrag]
    HintAnimation = hatNone
    Indent = 0
    TabOrder = 1
    TreeOptions.PaintOptions = [toHotTrack, toShowBackground, toShowButtons, toShowDropmark, toShowRoot, toThemeAware, toUseBlendedImages]
    TreeOptions.SelectionOptions = [toFullRowSelect]
    OnChange = lstNewChange
    OnGetText = lstNewGetText
    Columns = <>
  end
  object barCool: TCoolBar
    Left = 0
    Top = 0
    Width = 689
    Height = 44
    AutoSize = True
    Bands = <
      item
        BorderStyle = bsSingle
        Control = barTool
        ImageIndex = -1
        MinHeight = 36
        Width = 689
      end>
    EdgeBorders = [ebTop, ebBottom]
    object barTool: TToolBar
      Left = 9
      Top = 2
      Width = 676
      Height = 36
      AutoSize = True
      ButtonHeight = 36
      ButtonWidth = 90
      Caption = 'barTool'
      EdgeBorders = []
      Flat = True
      Images = IL
      ShowCaptions = True
      TabOrder = 0
      object toolNew: TToolButton
        Left = 0
        Top = 0
        Caption = '&New'
        ImageIndex = 0
        MenuItem = mnuNew
      end
      object toolOpen: TToolButton
        Left = 90
        Top = 0
        Caption = '&Open'
        ImageIndex = 1
        MenuItem = mnuOpen
      end
      object toolSave: TToolButton
        Left = 180
        Top = 0
        Caption = '&Save'
        ImageIndex = 2
        MenuItem = mnuSave
      end
      object ToolButton1: TToolButton
        Left = 270
        Top = 0
        Width = 8
        Caption = 'ToolButton1'
        ImageIndex = 7
        Style = tbsSeparator
      end
      object toolGenGo: TToolButton
        Left = 278
        Top = 0
        Caption = '&Generate'
        ImageIndex = 3
        MenuItem = mnuGenGo
      end
      object toolCreateEXE: TToolButton
        Left = 368
        Top = 0
        Caption = 'Create &EXE'
        ImageIndex = 5
        MenuItem = mnuCreateEXE
      end
      object toolCreateDLL: TToolButton
        Left = 458
        Top = 0
        Caption = 'Create &DLL'
        ImageIndex = 6
        MenuItem = mnuCreateDLL
      end
      object toolCreatePAT: TToolButton
        Left = 548
        Top = 0
        Caption = 'Create &patch file'
        ImageIndex = 7
        MenuItem = mnuCreatePAT
      end
    end
  end
  object chkOutputWait: TCheckBox
    Left = 232
    Top = 336
    Width = 305
    Height = 17
    Caption = 'Leave console window open after generating patches'
    TabOrder = 3
    OnClick = chkOutputWaitClick
  end
  object chkOptimal: TCheckBox
    Left = 232
    Top = 360
    Width = 441
    Height = 17
    Caption = 
      '"Optimal" patch generation (can be very slow when generating pat' +
      'ches for big files)'
    TabOrder = 4
    OnClick = chkOptimalClick
  end
  object MainMenu: TMainMenu
    Images = IL
    Left = 160
    Top = 328
    object mnuFile: TMenuItem
      Caption = '&File'
      object mnuNew: TMenuItem
        Caption = '&New'
        ImageIndex = 0
        ShortCut = 16462
        OnClick = mnuNewClick
      end
      object mnuOpen: TMenuItem
        Caption = '&Open'
        ImageIndex = 1
        ShortCut = 16463
        OnClick = mnuOpenClick
      end
      object mnuSave: TMenuItem
        Caption = '&Save'
        ImageIndex = 2
        ShortCut = 16467
        OnClick = mnuSaveClick
      end
      object mnuSaveas: TMenuItem
        Caption = 'Save &as...'
        OnClick = mnuSaveasClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object mnuExit: TMenuItem
        Caption = 'E&xit'
        OnClick = mnuExitClick
      end
    end
    object mnuAction: TMenuItem
      Caption = '&Action'
      object mnuClearcachedpatches: TMenuItem
        Caption = 'Empty &cache'
        ImageIndex = 4
        OnClick = mnuClearcachedpatchesClick