home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 January / Chip_2000-01_cd.bin / zkuste / Delphi / kolekce / d345 / cdbu.exe / CoolDBUtilities / Example / UnitMain.dfm / UnitMain.txt
Encoding:
Text File  |  1999-09-29  |  3.7 KB  |  141 lines
  1. object Form1: TForm1
  2.   Left = 202
  3.   Top = 142
  4.   ActiveControl = BitBtn1
  5.   BorderIcons = [biSystemMenu, biMinimize]
  6.   BorderStyle = bsSingle
  7.   Caption = 'CoolDBUtils Demo...'
  8.   ClientHeight = 277
  9.   ClientWidth = 324
  10.   Color = clBtnFace
  11.   Font.Charset = ANSI_CHARSET
  12.   Font.Color = clWindowText
  13.   Font.Height = -11
  14.   Font.Name = 'Tahoma'
  15.   Font.Style = []
  16.   OldCreateOrder = True
  17.   OnCreate = FormCreate
  18.   PixelsPerInch = 96
  19.   TextHeight = 13
  20.   object Bevel4: TBevel
  21.     Left = 24
  22.     Top = 136
  23.     Width = 193
  24.     Height = 81
  25.     Shape = bsFrame
  26.     Style = bsRaised
  27.   end
  28.   object LabelProgress: TLabel
  29.     Left = 32
  30.     Top = 232
  31.     Width = 67
  32.     Height = 13
  33.     Caption = 'LabelProgress'
  34.   end
  35.   object LabelInfo: TLabel
  36.     Left = 32
  37.     Top = 144
  38.     Width = 180
  39.     Height = 69
  40.     AutoSize = False
  41.     Caption = 'LabelInfo'
  42.     WordWrap = True
  43.   end
  44.   object ProgressBar1: TProgressBar
  45.     Left = 32
  46.     Top = 248
  47.     Width = 185
  48.     Height = 13
  49.     Min = 0
  50.     Max = 100
  51.     TabOrder = 1
  52.   end
  53.   object BitBtn1: TBitBtn
  54.     Left = 232
  55.     Top = 24
  56.     Width = 75
  57.     Height = 25
  58.     Caption = '&GO!'
  59.     ModalResult = 5
  60.     TabOrder = 0
  61.     OnClick = BitBtn1Click
  62.     Glyph.Data = {
  63.       DE010000424DDE01000000000000760000002800000024000000120000000100
  64.       0400000000006801000000000000000000001000000000000000000000000000
  65.       80000080000000808000800000008000800080800000C0C0C000808080000000
  66.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00344446333334
  67.       44433333FFFF333333FFFF33000033AAA43333332A4333338833F33333883F33
  68.       00003332A46333332A4333333383F33333383F3300003332A2433336A6633333
  69.       33833F333383F33300003333AA463362A433333333383F333833F33300003333
  70.       6AA4462A46333333333833FF833F33330000333332AA22246333333333338333
  71.       33F3333300003333336AAA22646333333333383333F8FF33000033444466AA43
  72.       6A43333338FFF8833F383F330000336AA246A2436A43333338833F833F383F33
  73.       000033336A24AA442A433333333833F33FF83F330000333333A2AA2AA4333333
  74.       333383333333F3330000333333322AAA4333333333333833333F333300003333
  75.       333322A4333333333333338333F333330000333333344A433333333333333338
  76.       3F333333000033333336A24333333333333333833F333333000033333336AA43
  77.       33333333333333833F3333330000333333336663333333333333333888333333
  78.       0000}
  79.     NumGlyphs = 2
  80.   end
  81.   object RadioGroup1: TRadioGroup
  82.     Left = 24
  83.     Top = 16
  84.     Width = 193
  85.     Height = 105
  86.     Caption = 'CoolDBUtilities'
  87.     ItemIndex = 0
  88.     Items.Strings = (
  89.       '&1. Backup the database'
  90.       '&2. Pack (compress) the database'
  91.       '&3. Save database structure'
  92.       '&4. Restore database structure'
  93.       '&5. Update the database')
  94.     TabOrder = 2
  95.     OnClick = RadioGroup1Click
  96.   end
  97.   object BitBtn2: TBitBtn
  98.     Left = 232
  99.     Top = 56
  100.     Width = 75
  101.     Height = 25
  102.     TabOrder = 3
  103.     Kind = bkClose
  104.   end
  105.   object CoolDBBackup1: TCoolDBBackup
  106.     TablesMask = '*.*'
  107.     OnActionInProgress = CoolDBBackup1ActionInProgress
  108.     OnExecuteEnd = CoolDBBackup1ExecuteEnd
  109.     Left = 40
  110.     Top = 176
  111.   end
  112.   object CoolDBStructureRestorer1: TCoolDBStructureRestorer
  113.     TablesMask = '*.*'
  114.     OnActionInProgress = CoolDBBackup1ActionInProgress
  115.     OnExecuteEnd = CoolDBBackup1ExecuteEnd
  116.     Left = 136
  117.     Top = 176
  118.   end
  119.   object CoolDBUpdater21: TCoolDBUpdater2
  120.     TablesMask = '*.*'
  121.     OnActionInProgress = CoolDBBackup1ActionInProgress
  122.     OnExecuteEnd = CoolDBBackup1ExecuteEnd
  123.     Left = 168
  124.     Top = 176
  125.   end
  126.   object CoolDBStructureExporter1: TCoolDBStructureExporter
  127.     TablesMask = '*.*'
  128.     OnActionInProgress = CoolDBBackup1ActionInProgress
  129.     OnExecuteEnd = CoolDBBackup1ExecuteEnd
  130.     Left = 104
  131.     Top = 176
  132.   end
  133.   object CoolDBPack1: TCoolDBPack
  134.     TablesMask = '*.*'
  135.     OnActionInProgress = CoolDBBackup1ActionInProgress
  136.     OnExecuteEnd = CoolDBBackup1ExecuteEnd
  137.     Left = 72
  138.     Top = 176
  139.   end
  140. end
  141.