Skip to content
This repository
tree: 1c3c25226c
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 180 lines (179 sloc) 3.617 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179
object fmBackupRestore: TfmBackupRestore
  Left = 402
  Height = 440
  Top = 295
  Width = 439
  Caption = 'Backup/Resore database'
  ClientHeight = 440
  ClientWidth = 439
  Position = poScreenCenter
  LCLVersion = '0.9.31'
  object GroupBox1: TGroupBox
    Left = 0
    Height = 288
    Top = 0
    Width = 439
    Align = alTop
    ClientHeight = 284
    ClientWidth = 435
    Color = clCream
    ParentColor = False
    TabOrder = 0
    object Label1: TLabel
      Left = 12
      Height = 18
      Top = 10
      Width = 99
      Caption = 'Operation Type'
      ParentColor = False
    end
    object cbOperation: TComboBox
      Left = 118
      Height = 31
      Top = 6
      Width = 204
      ItemHeight = 0
      ItemIndex = 0
      Items.Strings = (
        'Backup'
        'Restore'
      )
      Style = csDropDownList
      TabOrder = 0
      Text = 'Backup'
    end
    object Label2: TLabel
      Left = 13
      Height = 18
      Top = 89
      Width = 123
      Caption = 'Targeted Database'
      ParentColor = False
    end
    object Label3: TLabel
      Left = 14
      Height = 18
      Top = 142
      Width = 76
      Caption = 'Backup File'
      ParentColor = False
    end
    object edBackup: TEdit
      Left = 102
      Height = 27
      Top = 137
      Width = 248
      Anchors = [akTop, akLeft, akRight]
      TabOrder = 1
    end
    object SpeedButton1: TSpeedButton
      Left = 364
      Height = 22
      Top = 142
      Width = 23
      Anchors = [akTop, akRight]
      NumGlyphs = 0
      OnClick = SpeedButton1Click
    end
    object bbStart: TBitBtn
      Left = 6
      Height = 30
      Top = 246
      Width = 75
      Caption = 'Start'
      Color = 16249563
      Kind = bkAll
      OnClick = bbStartClick
      TabOrder = 2
    end
    object edTargetDatabase: TEdit
      Left = 142
      Height = 27
      Top = 86
      Width = 207
      Anchors = [akTop, akLeft, akRight]
      ParentBidiMode = False
      TabOrder = 3
    end
    object sbBrowseTargetdb: TSpeedButton
      Left = 364
      Height = 22
      Top = 91
      Width = 23
      Anchors = [akTop, akRight]
      NumGlyphs = 0
      OnClick = sbBrowseTargetdbClick
    end
    object Label4: TLabel
      Left = 14
      Height = 18
      Top = 177
      Width = 72
      Caption = 'User name'
      ParentColor = False
    end
    object edUserName: TEdit
      Left = 102
      Height = 27
      Top = 177
      Width = 145
      TabOrder = 4
    end
    object Label5: TLabel
      Left = 13
      Height = 18
      Top = 217
      Width = 62
      Caption = 'Password'
      ParentColor = False
    end
    object edPassword: TEdit
      Left = 102
      Height = 27
      Top = 209
      Width = 145
      EchoMode = emPassword
      PasswordChar = '-'
      TabOrder = 5
    end
    object Label6: TLabel
      Left = 14
      Height = 18
      Top = 51
      Width = 31
      Caption = 'Host'
      ParentColor = False
    end
    object edHost: TEdit
      Left = 118
      Height = 27
      Top = 48
      Width = 203
      Anchors = [akTop, akLeft, akRight]
      ParentBidiMode = False
      TabOrder = 6
    end
  end
  object meLog: TMemo
    Left = 0
    Height = 152
    Top = 288
    Width = 439
    Align = alClient
    Font.Name = 'courier new [monotype]'
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssAutoBoth
    TabOrder = 1
  end
  object OpenDialog1: TOpenDialog
    left = 384
    top = 144
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '.fbk'
    Options = [ofOverwritePrompt, ofEnableSizing, ofViewDetail]
    left = 384
    top = 208
  end
end
Something went wrong with that request. Please try again.