frmprincipal.dfm

A backupper program that make your codes safty

      7ACF64C3D414A28DA139CF4D671FF8A6F6EC7F3BA3E3D2F6872F64E32513582F
      13800FF93DE6ED5F51C13161F9976F6543E510640F239DEFF951B67B7D4EFAA5
      6F66A133DD8FCFFA6F19FBB16FFB9E5F36B8FFF1BA0FF9BD7FF9BF1FF8371BFC
      3CCF21C36FF2C6AFF7C98FF6CBEFF6CDBFF5CF1FF6D1FFF4D35FF5D52FF4D78F
      F4D9FF5FF3DB7FFCDD9FF1DFDFF2E12FFEE33FF1E5DFF0E78FFEE92FEFEB5FF0
      EDEFFEEFBFEEF14FEEF34FFFF58FECF7DFEDF9AFFFFB0F1004040E2458D0E041
      8409151A04D0D0E1438811254EA458D1E2458C19356EE40871E1479021458E24
      59D2E4C9811D55AE64D9D2E54B8B2865CEA459D32649983975EEE4E9F2E64FA0
      418582EC59D4E851A343952E654A13E953A8513736A55AD52A42A959B56EBDDA
      D52BD3AD61C526FD5AD66CCDB169D5FA3CDBD6EDC8B571E5667C5BD72ED6B979
      F53EBCDBB7EF5EC079FD0E7E1BD8F05AC289CD1E662C56F1E3AE8D2567855C99
      EA64CC4F2D6F569AD97351CEA1817E26AD53F469B4A555B744DD1AE56AD82A5D
      CFC64319DB365DDAB93FDEE61D53F76FBCBD857B045E9CE070E40E8D2F27903C
      3973E3CE91432F2E7D3875E0D68563FFADBD3777DDDE7983CF2DFE3679DAE66D
      A39FAD3E7640003B}
    Stretch = True
  end
  object Label2: TLabel
    Left = 183
    Top = 408
    Width = 48
    Height = 13
    Caption = 'Destino:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label4: TLabel
    Left = 185
    Top = 283
    Width = 68
    Height = 13
    Caption = 'Comentario:'
    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 = 406
    Top = 507
    Width = 31
    Height = 13
    Cursor = crHandPoint
    Caption = 'Autor'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold, fsUnderline]
    ParentFont = False
    OnClick = Label5Click
  end
  object edtFuente: TEdit
    Left = 232
    Top = 5
    Width = 375
    Height = 21
    TabOrder = 0
  end
  object btnFuente: TButton
    Left = 611
    Top = 3
    Width = 25
    Height = 25
    Caption = '...'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    OnClick = btnFuenteClick
  end
  object btnBackup: TButton
    Left = 594
    Top = 499
    Width = 75
    Height = 25
    Caption = 'Backup!'
    TabOrder = 2
    OnClick = btnBackupClick
  end
  object btnCerrar: TButton
    Left = 508
    Top = 500
    Width = 75
    Height = 25
    Caption = 'Cerrar'
    TabOrder = 3
    OnClick = btnCerrarClick
  end
  object edtDestino: TEdit
    Left = 232
    Top = 405
    Width = 367
    Height = 21
    TabOrder = 4
  end
  object btnDestino: TButton
    Left = 603
    Top = 402
    Width = 25
    Height = 25
    Caption = '...'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 5
    OnClick = btnDestinoClick
  end
  object mComment: TMemo
    Left = 182
    Top = 297
    Width = 489
    Height = 96
    Color = clWhite
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    ParentFont = False
    ScrollBars = ssVertical
    TabOrder = 6
  end
  object tvwFiles: TTreeView
    Left = 182
    Top = 48
    Width = 489
    Height = 233
    AutoExpand = True
    Indent = 19
    ReadOnly = True
    TabOrder = 7
    OnDblClick = tvwFilesDblClick
    OnDeletion = tvwFilesDeletion
    OnExpanding = tvwFilesExpanding
    OnGetImageIndex = tvwFilesGetImageIndex
    OnGetSelectedIndex = tvwFilesGetSelectedIndex
  end
  object btnVerFuente: TBitBtn
    Left = 641
    Top = 3
    Width = 36
    Height = 25
    Caption = 'Ver'
    TabOrder = 8
    OnClick = btnVerFuenteClick
  end
  object btnVerDestino: TBitBtn
    Left = 633
    Top = 402
    Width = 36
    Height = 25
    Caption = 'Ver'
    TabOrder = 9
    OnClick = btnVerDestinoClick
  end
  object GroupBox1: TGroupBox
    Left = 182
    Top = 432
    Width = 489
    Height = 65
    Caption = 'Opciones de compresion'
    TabOrder = 10
    object AbMeterAllProgress: TAbMeter
      Left = 176
      Top = 17
      Width = 305
      Height = 16
      Orientation = moHorizontal
      UnusedColor = clBtnFace
      UsedColor = clNavy
    end
    object AbMeterFileProgress: TAbMeter
      Left = 176
      Top = 37
      Width = 305
      Height = 16
      Orientation = moHorizontal
      UnusedColor = clBtnFace
      UsedColor = clNavy
    end
    object lblFile: TLabel
      Left = 137
      Top = 18
      Width = 35
      Height = 13
      Caption = 'Fichero'
    end
    object lblItem: TLabel
      Left = 152
      Top = 38
      Width = 19
      Height = 13
      Caption = 'item'
    end
    object chkCompress: TCheckBox
      Left = 8
      Top = 16
      Width = 128
      Height = 17
      Caption = 'Comprimir usando ZIP'
      TabOrder = 0
      OnClick = chkCompressClick
    end
  end
  object AbZipper1: TAbZipper
    ArchiveProgressMeter = meterAllProgress
    ItemProgressMeter = meterFileProgress
    AutoSave = True
    DOSMode = False
    StoreOptions = [soRemoveDots, soRecurse, soFreshen, soReplace]
    Left = 182
    Top = 496
  end
  object meterAllProgress: TAbVCLMeterLink
    Meter = AbMeterAllProgress
    Left = 214
    Top = 496
  end
  object meterFileProgress: TAbVCLMeterLink
    Meter = AbMeterFileProgress
    Left = 246
    Top = 496
  end
end