home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 6 B / CHIP_HITWARE6_B.iso / bonus / EverythingIOwn / EIOWN_17.EXE / EIO.EXE / 0 / RCDATA / TFRMBACKUP / TFRMBACKUP.txt
Encoding:
Text File  |  1998-02-24  |  8.4 KB  |  306 lines
  1. object frmBackup: TfrmBackup
  2.   Left = 331
  3.   Top = 227
  4.   BorderIcons = [biSystemMenu]
  5.   AutoScroll = False
  6.   Caption = 'Backup and Restore'
  7.   ClientHeight = 292
  8.   ClientWidth = 426
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Position = poScreenCenter
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object PageControl1: TPageControl
  17.     Left = 16
  18.     Top = 24
  19.     Width = 393
  20.     Height = 249
  21.     ActivePage = Backup
  22.     TabOrder = 0
  23.     TabStop = False
  24.     object Backup: TTabSheet
  25.       Caption = 'Backup'
  26.       object Label2: TLabel
  27.         Left = 40
  28.         Top = 8
  29.         Width = 326
  30.         Height = 13
  31.         Caption = 
  32.           'This option will allow you to save all your DATA files to a flop' +
  33.           'py disk.  '
  34.         Font.Color = clBlue
  35.         Font.Height = -11
  36.         Font.Name = 'MS Sans Serif'
  37.         Font.Style = []
  38.         ParentFont = False
  39.       end
  40.       object Label3: TLabel
  41.         Left = 120
  42.         Top = 32
  43.         Width = 146
  44.         Height = 16
  45.         Caption = '**** IMPORTANT ****'
  46.         Font.Color = clBlue
  47.         Font.Height = -13
  48.         Font.Name = 'MS Sans Serif'
  49.         Font.Style = [fsBold]
  50.         ParentFont = False
  51.       end
  52.       object Label4: TLabel
  53.         Left = 64
  54.         Top = 48
  55.         Width = 276
  56.         Height = 13
  57.         Caption = 'After making your backup, store the disk(s) in a safe place.'
  58.         Font.Color = clBlue
  59.         Font.Height = -11
  60.         Font.Name = 'MS Sans Serif'
  61.         Font.Style = []
  62.         ParentFont = False
  63.       end
  64.       object Label5: TLabel
  65.         Left = 64
  66.         Top = 80
  67.         Width = 259
  68.         Height = 13
  69.         Caption = 'If your floppy drive is not '#39'A'#39',  type your drive letter here:'
  70.         Font.Color = clBlue
  71.         Font.Height = -11
  72.         Font.Name = 'MS Sans Serif'
  73.         Font.Style = []
  74.         ParentFont = False
  75.       end
  76.       object StatusLb: TLabel
  77.         Left = 64
  78.         Top = 174
  79.         Width = 3
  80.         Height = 13
  81.         Color = clBtnFace
  82.         Font.Color = clNavy
  83.         Font.Height = -11
  84.         Font.Name = 'MS Sans Serif'
  85.         Font.Style = []
  86.         ParentColor = False
  87.         ParentFont = False
  88.       end
  89.       object btnZip: TBitBtn
  90.         Left = 64
  91.         Top = 120
  92.         Width = 145
  93.         Height = 41
  94.         Caption = '&Save To Floppy Disk'
  95.         Font.Color = clBlue
  96.         Font.Height = -13
  97.         Font.Name = 'MS Sans Serif'
  98.         Font.Style = []
  99.         ParentFont = False
  100.         TabOrder = 1
  101.         OnClick = btnZipClick
  102.         Glyph.Data = {
  103.           78010000424D7801000000000000760000002800000020000000100000000100
  104.           04000000000000000000120B0000120B00000000000000000000000000000000
  105.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  106.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  107.           333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
  108.           00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
  109.           00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
  110.           00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
  111.           00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
  112.           00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
  113.           00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
  114.           0003737FFFFFFFFF7F73300999999999003337777777777777330000}
  115.         Layout = blGlyphTop
  116.         NumGlyphs = 2
  117.       end
  118.       object txtDrive: TEdit
  119.         Left = 328
  120.         Top = 80
  121.         Width = 17
  122.         Height = 21
  123.         CharCase = ecUpperCase
  124.         MaxLength = 1
  125.         TabOrder = 0
  126.         Text = 'A'
  127.       end
  128.       object BitBtn1: TBitBtn
  129.         Left = 232
  130.         Top = 120
  131.         Width = 97
  132.         Height = 41
  133.         Caption = '&Cancel'
  134.         Font.Color = clRed
  135.         Font.Height = -13
  136.         Font.Name = 'MS Sans Serif'
  137.         Font.Style = []
  138.         ParentFont = False
  139.         TabOrder = 2
  140.         OnClick = BitBtn1Click
  141.         Kind = bkCancel
  142.         Layout = blGlyphTop
  143.       end
  144.       object ProgressBar1: TProgressBar
  145.         Left = 64
  146.         Top = 192
  147.         Width = 265
  148.         Height = 17
  149.         Min = 0
  150.         Max = 100
  151.         Step = 5
  152.         TabOrder = 3
  153.         Visible = False
  154.       end
  155.     end
  156.     object Restore: TTabSheet
  157.       Caption = 'Restore'
  158.       object StatusLb1: TLabel
  159.         Left = 64
  160.         Top = 174
  161.         Width = 3
  162.         Height = 13
  163.         Color = clBtnFace
  164.         Font.Color = clNavy
  165.         Font.Height = -11
  166.         Font.Name = 'MS Sans Serif'
  167.         Font.Style = []
  168.         ParentColor = False
  169.         ParentFont = False
  170.       end
  171.       object Label6: TLabel
  172.         Left = 56
  173.         Top = 80
  174.         Width = 259
  175.         Height = 13
  176.         Caption = 'If your floppy drive is not '#39'A'#39',  type your drive letter here:'
  177.         Font.Color = clBlue
  178.         Font.Height = -11
  179.         Font.Name = 'MS Sans Serif'
  180.         Font.Style = []
  181.         ParentFont = False
  182.       end
  183.       object Label1: TLabel
  184.         Left = 24
  185.         Top = 24
  186.         Width = 338
  187.         Height = 17
  188.         Caption = 
  189.           'This option will allow you to Restore all your DATA from the Flo' +
  190.           'ppy Disk.'
  191.         Font.Color = clBlue
  192.         Font.Height = -11
  193.         Font.Name = 'MS Sans Serif'
  194.         Font.Style = []
  195.         ParentFont = False
  196.       end
  197.       object Label7: TLabel
  198.         Left = 24
  199.         Top = 48
  200.         Width = 346
  201.         Height = 13
  202.         Caption = 
  203.           'Make sure your Backup disk is in the drive, and press the Restor' +
  204.           'e button.'
  205.         Font.Color = clBlue
  206.         Font.Height = -11
  207.         Font.Name = 'MS Sans Serif'
  208.         Font.Style = []
  209.         ParentFont = False
  210.       end
  211.       object btnCancel1: TBitBtn
  212.         Left = 239
  213.         Top = 128
  214.         Width = 97
  215.         Height = 41
  216.         Caption = '&Cancel'
  217.         Font.Color = clRed
  218.         Font.Height = -13
  219.         Font.Name = 'MS Sans Serif'
  220.         Font.Style = []
  221.         ParentFont = False
  222.         TabOrder = 2
  223.         OnClick = btnCancel1Click
  224.         Kind = bkCancel
  225.         Layout = blGlyphTop
  226.       end
  227.       object ProgressBar2: TProgressBar
  228.         Left = 64
  229.         Top = 192
  230.         Width = 265
  231.         Height = 17
  232.         Min = 0
  233.         Max = 100
  234.         Step = 5
  235.         TabOrder = 3
  236.         Visible = False
  237.       end
  238.       object txtDrive1: TEdit
  239.         Left = 320
  240.         Top = 80
  241.         Width = 17
  242.         Height = 21
  243.         CharCase = ecUpperCase
  244.         MaxLength = 1
  245.         TabOrder = 0
  246.         Text = 'A'
  247.       end
  248.       object btnRestore: TBitBtn
  249.         Left = 56
  250.         Top = 128
  251.         Width = 161
  252.         Height = 41
  253.         Caption = '&Restore To Hard Drive'
  254.         Font.Color = clBlue
  255.         Font.Height = -13
  256.         Font.Name = 'MS Sans Serif'
  257.         Font.Style = []
  258.         ParentFont = False
  259.         TabOrder = 1
  260.         OnClick = btnRestoreClick
  261.         Glyph.Data = {
  262.           78010000424D7801000000000000760000002800000020000000100000000100
  263.           04000000000000000000120B0000120B00000000000000000000000000000000
  264.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  265.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  266.           3333333333333333333333333333333333333333333333333333333333333333
  267.           33333FFFFFFFFFFFFFFF000000000000000077777777777777770F7777777777
  268.           77707F3F3333333333370F988888888888707F733FFFFFFFF3370F8800000000
  269.           88707F337777777733370F888888888888707F333FFFFFFFF3370F8800000000
  270.           88707F337777777733370F888888888888707F333333333333370F8888888888
  271.           88707F333333333333370FFFFFFFFFFFFFF07FFFFFFFFFFFFFF7000000000000
  272.           0000777777777777777733333333333333333333333333333333333333333333
  273.           33333333333333333333333333333333333333333333333333330000}
  274.         Layout = blGlyphTop
  275.         NumGlyphs = 2
  276.       end
  277.     end
  278.   end
  279.   object BackupZip: TXceedZip
  280.     FilesToProcess.Strings = (
  281.       'EIOwn.db'
  282.       'EIOwn.MB'
  283.       'EIOwn.PX'
  284.       'EIOwn.Y*'
  285.       'EIOwn.X*'
  286.       'Business.db'
  287.       'Business.PX'
  288.       'Location.db'
  289.       'Location.PX'
  290.       'Type.db'
  291.       'Type.PX'
  292.       'Manufact.db'
  293.       'Manufact.PX')
  294.     Compression = 6
  295.     ClearDisks = True
  296.     Overwrite = xowAlways
  297.     StoredExtensions = '.ZIP;.LZH;.ARC;.ARJ;.ZOO'
  298.     OnAdding = BackupZipAdding
  299.     OnExtracting = BackupZipExtracting
  300.     OnTesting = BackupZipTesting
  301.     OnStatus = BackupZipStatus
  302.     Left = 22
  303.     Top = 16
  304.   end
  305. end
  306.