frminfo.dfm

delphi 开发的自动升级源码

object InfoForm: TInfoForm
  Left = 253
  Top = 133
  Width = 636
  Height = 445
  BorderWidth = 4
  Caption = #39033#30446#23646#24615
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object RzPanel3: TRzPanel
    Left = 0
    Top = 0
    Width = 620
    Height = 37
    Align = alTop
    BorderOuter = fsNone
    TabOrder = 0
    DesignSize = (
      620
      37)
    object RzLabel4: TRzLabel
      Left = 8
      Top = 12
      Width = 60
      Height = 12
      Caption = #39033#30446#21517#31216#65306
    end
    object RzLabel2: TRzLabel
      Left = 204
      Top = 9
      Width = 48
      Height = 12
      Caption = #26681#30446#24405#65306
    end
    object edtProjectName: TRzEdit
      Left = 68
      Top = 5
      Width = 121
      Height = 20
      FrameColor = 12164479
      FrameVisible = True
      TabOrder = 0
    end
    object edtRootDir: TRzButtonEdit
      Left = 252
      Top = 5
      Width = 365
      Height = 20
      Anchors = [akLeft, akTop, akRight]
      FrameColor = 12164479
      FrameVisible = True
      ReadOnly = True
      TabOrder = 1
      AltBtnWidth = 15
      ButtonWidth = 15
      FlatButtons = True
      OnButtonClick = edtRootDirButtonClick
    end
  end
  object lvFiles: TRzListView
    Left = 157
    Top = 37
    Width = 463
    Height = 286
    Align = alClient
    Columns = <
      item
        Caption = #25991#20214#21517
        Width = 150
      end
      item
        Caption = #20462#25913#26085#26399
        Width = 130
      end
      item
        AutoSize = True
        Caption = #29256#26412#21495
      end>
    DragMode = dmAutomatic
    FrameColor = 12164479
    FrameVisible = True
    Items.Data = {
      590000000300000000000000FFFFFFFFFFFFFFFF020000000000000000000000
      000000FFFFFFFFFFFFFFFF020000000000000000000000000000FFFFFFFFFFFF
      FFFF0200000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF}
    PopupMenu = pmnuFiles
    ReadOnly = True
    RowSelect = True
    SmallImages = ImageList2
    TabOrder = 1
    ViewStyle = vsReport
    OnClick = lvFilesClick
    OnColumnClick = lvFilesColumnClick
    OnCompare = lvFilesCompare
    OnGetImageIndex = lvFilesGetImageIndex
    OnSelectItem = lvFilesSelectItem
  end
  object RzSizePanel1: TRzSizePanel
    Left = 0
    Top = 37
    Width = 157
    Height = 286
    SizeBarWidth = 6
    TabOrder = 2
    UseGradients = True
    object tvDirectory: TRzTreeView
      Left = 0
      Top = 0
      Width = 149
      Height = 286
      SelectionPen.Color = clBtnShadow
      Align = alLeft
      FrameColor = 12164479
      FrameVisible = True
      HideSelection = False
      Images = ImageList1
      Indent = 19
      PopupMenu = pmnuDirectory
      ReadOnly = True
      TabOrder = 0
      OnChange = tvDirectoryChange
      Items.Data = {
        030000001A0000000000000002000000FFFFFFFFFFFFFFFF0000000002000000
        0143200000000400000004000000FFFFFFFFFFFFFFFF00000000000000000757
        696E646F7773260000000400000004000000FFFFFFFFFFFFFFFF000000000000
        00000D50726F6772616D2046696C65731A0000000000000002000000FFFFFFFF
        FFFFFFFF00000000010000000144240000000400000004000000FFFFFFFFFFFF
        FFFF00000000000000000B4D792050726F6A656374731A000000000000000200
        0000FFFFFFFFFFFFFFFF00000000010000000145210000000400000004000000
        FFFFFFFFFFFFFFFF000000000000000008434420526F6F6D73}
    end
  end
  object RzPanel2: TRzPanel
    Left = 0
    Top = 323
    Width = 620
    Height = 41
    Align = alBottom
    BorderOuter = fsGroove
    TabOrder = 3
    DesignSize = (
      620
      41)
    object RzLabel3: TRzLabel
      Left = 8
      Top = 13
      Width = 60
      Height = 12
      Caption = #22791#27880#20449#24687#65306
    end
    object edtDescription: TRzEdit
      Left = 68
      Top = 9
      Width = 549
      Height = 20
      Anchors = [akLeft, akTop, akRight]
      FrameColor = 12164479
      FrameVisible = True
      TabOrder = 0
    end
  end
  object RzPanel1: TRzPanel
    Left = 0
    Top = 364
    Width = 620
    Height = 39
    Align = alBottom
    BorderOuter = fsNone
    TabOrder = 4
    object RzButton1: TRzButton
      Left = 240
      Top = 8
      Action = actOK
      Color = 15791348
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      HotTrackColorType = htctActual
      TabOrder = 0
    end
    object RzButton2: TRzButton
      Left = 320
      Top = 8
      Action = actCancel
      Color = 15791348
      HighlightColor = 16026986
      HotTrack = True
      HotTrackColor = 3983359
      HotTrackColorType = htctActual
      TabOrder = 1
    end
  end
  object edtFloat: TRzEdit
    Left = 376
    Top = 88
    Width = 121
    Height = 20
    FrameColor = 12164479
    FrameVisible = True
    TabOrder = 5
    Visible = False
    OnKeyDown = edtFloatKeyDown
  end
  object ActionList1: TActionList
    Left = 108
    Top = 128
    object actOK: TAction
      Caption = #30830#23450'(&O)'
      OnExecute = actOKExecute
    end
    object actCancel: TAction
      Caption = #21462#28040'(&C)'
      OnExecute = actCancelExecute
    end
    object actSelectRoot: TAction
      Category = 'Directory'
      Caption = #36873#25321#26681#30446#24405'(&S)'
      OnExecute = actSelectRootExecute
    end
    object actAddFile: TAction
      Category = 'Files'
      Caption = #28155#21152#25991#20214
      OnExecute = actAddFileExecute
      OnUpdate = actAddFileUpdate
    end
    object actAddDirectory: TAction
      Category = 'Directory'
      Caption = #28155#21152#30446#24405'(&A)'
      OnExecute = actAddDirectoryExecute
      OnUpdate = actAddDirectoryUpdate
    end
    object actDeleteDirectory: TAction
      Category = 'Directory'
      Caption = #21024#38500#30446#24405'(&D)'
      OnExecute = actDeleteDirectoryExecute
      OnUpdate = actDeleteDirectoryUpdate
    end
    object actDeleteFile: TAction
      Category = 'Files'
      Caption = #21024#38500#25991#20214
      OnExecute = actDeleteFileExecute
      OnUpdate = actDeleteFileUpdate
    end
    object actRefreshFiles: TAction