examples/services/RestoreDlgUnit.lfm

object RestoreDlg: TRestoreDlg
  Left = 1399
  Height = 265
  Top = 553
  Width = 358
  Caption = 'Restore Database'
  ClientHeight = 265
  ClientWidth = 358
  OnClose = FormClose
  OnShow = FormShow
  Position = poMainFormCenter
  LCLVersion = '1.8.1.0'
  object Bevel1: TBevel
    Left = 3
    Height = 222
    Top = 2
    Width = 347
  end
  object Label2: TLabel
    Left = 12
    Height = 14
    Top = 7
    Width = 39
    Caption = 'Server'
    ParentColor = False
  end
  object Edit1: TEdit
    Left = 12
    Height = 24
    Top = 24
    Width = 180
    ReadOnly = True
    TabOrder = 0
  end
  object Label1: TLabel
    Left = 12
    Height = 14
    Top = 56
    Width = 95
    Caption = 'Database Name'
    ParentColor = False
  end
  object Edit2: TEdit
    Left = 12
    Height = 24
    Top = 72
    Width = 296
    TabOrder = 1
  end
  object RadioButton1: TRadioButton
    Left = 12
    Height = 22
    Top = 112
    Width = 93
    Caption = 'Server Side'
    Checked = True
    TabOrder = 2
    TabStop = True
  end
  object RadioButton2: TRadioButton
    Left = 134
    Height = 22
    Top = 112
    Width = 88
    Caption = 'Client Side'
    TabOrder = 3
  end
  object Label3: TLabel
    Left = 12
    Height = 14
    Top = 144
    Width = 68
    Caption = 'Backup File'
    ParentColor = False
  end
  object Edit3: TEdit
    Left = 12
    Height = 24
    Top = 160
    Width = 288
    TabOrder = 4
  end
  object SpeedButton1: TSpeedButton
    Left = 310
    Height = 25
    Top = 160
    Width = 25
    Glyph.Data = {
      36040000424D3604000000000000360000002800000010000000100000000100
      2000000000000004000064000000640000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00002D88D8FF2D87D8FF2D88D8FF2D88D8FF2D88D8FF2D88D8FF2D88D8FF2D88
      D8FF2D88D8FF2D88D8FF2D87D8FF2D88D8FF2C86D8FF0000000000000000338E
      D9FFDCF0FAFFA7DDF4FF9EDBF4FF96DAF3FF8ED8F3FF86D7F3FF7FD4F2FF79D3
      F2FF72D2F1FF6CD0F1FF69CFF1FFC2EAF8FF338ED9FF00000000000000003594
      DAFFEFFAFEFFA1E9F9FF91E5F8FF81E1F7FF72DEF6FF63DAF5FF54D7F4FF47D3
      F3FF39D0F2FF2ECDF1FF26CBF0FFCAF2FBFF3594DAFF0000000000000000369A
      DAFFF2FAFDFFB3EDFAFFA4E9F9FF95E6F8FF85E2F7FF76DEF6FF65DBF5FF57D7
      F4FF49D4F3FF3BD1F2FF30CEF1FFCCF2FBFF3598DAFF000000000000000036A1
      DAFFF6FCFEFFC8F2FCFFB9EFFBFFACECFAFF9CE8F9FF8BE3F7FF7CE0F6FF6CDC
      F6FF5DD9F5FF4FD6F4FF44D3F3FFD0F3FCFF359FDAFF000000000000000037A6
      DAFFFEFFFFFFF8FDFFFFF6FDFFFFF5FCFFFFF3FCFEFFD8F6FCFF94E6F8FF85E3
      F7FF76DFF6FF68DBF5FF5CD8F4FFD7F4FCFF35A4DAFF000000000000000035AB
      DAFFE8F6FBFF94D4EFFF88CEEEFF73C1E9FFC9E9F6FFF2FCFEFFF3FCFEFFF2FC
      FEFFF0FCFEFFEFFBFEFFEEFBFEFFFEFFFFFF36ABDAFF000000000000000036AA
      DAFFF1FAFDFF94DEF5FF93DCF4FF81D5F2FF6ACAEDFF6CCBEAFF85D3EFFF80D2
      EFFF7AD0EFFF76CFEEFF72CFEEFFE9F7FBFF34AEDAFF000000000000000035AF
      DAFFF7FCFEFF8EE4F8FF91DEF5FF9FE0F5FFACE1F6FFEFFBFEFFF4FDFEFFF3FC
      FEFFF1FCFEFFEFFBFEFFEEFBFEFFFAFDFFFF36AFDAFF000000000000000036B3
      DAFFFDFEFEFFFEFFFFFFFEFEFFFFFDFEFFFFFEFFFFFFEAF7FBFF6BC7E4FF6BC7
      E3FF6BC7E3FF6BC7E3FF79CDE6FF74CAE5FF00000000000000000000000034B4
      D9FF5EC2E1FF60C3E2FF60C3E2FF60C3E2FF5FC3E2FF3CB6DBFF000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000
    }
    OnClick = SpeedButton1Click
  end
  object Button1: TButton
    Left = 96
    Height = 25
    Top = 232
    Width = 75
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 5
  end
  object Button2: TButton
    Left = 191
    Height = 25
    Top = 232
    Width = 75
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 6
  end
  object CheckBox1: TCheckBox
    Left = 12
    Height = 22
    Top = 192
    Width = 182
    Caption = 'Replace Existing Database'
    TabOrder = 7
  end
  object OpenDialog1: TOpenDialog
    Title = 'Open existing backup file'
    DefaultExt = '.gbk'
    Filter = 'Backup Files|*.gbk|All Files|*.*'
    Options = [ofFileMustExist, ofEnableSizing, ofViewDetail]
    left = 312
    top = 104
  end
  object IBRestoreService1: TIBRestoreService
    ServerName = 'localhost'
    Protocol = TCP
    Params.Strings = (
      'user_name=SYSDBA'
    )
    TraceFlags = []
    Verbose = True
    StatisticsRequested = [bsTotalTime]
    BackupFileLocation = flClientSide
    DatabaseName.Strings = (
      '/tmp/mytest.fdb'
    )
    PageSize = 0
    PageBuffers = 0
    left = 272
    top = 16
  end
end
Revision:	143
Committed:	Fri Feb 23 12:11:21 2018 UTC (6 years, 9 months ago) by tony
File size:	5118 byte(s)
Log Message:	Fixes Merged
#	User	Rev	Content
1	tony	143	object RestoreDlg: TRestoreDlg
2			Left = 1399
3			Height = 265
4			Top = 553
5			Width = 358
6			Caption = 'Restore Database'
7			ClientHeight = 265
8			ClientWidth = 358
9			OnClose = FormClose
10			OnShow = FormShow
11			Position = poMainFormCenter
12			LCLVersion = '1.8.1.0'
13			object Bevel1: TBevel
14			Left = 3
15			Height = 222
16			Top = 2
17			Width = 347
18			end
19			object Label2: TLabel
20			Left = 12
21			Height = 14
22			Top = 7
23			Width = 39
24			Caption = 'Server'
25			ParentColor = False
26			end
27			object Edit1: TEdit
28			Left = 12
29			Height = 24
30			Top = 24
31			Width = 180
32			ReadOnly = True
33			TabOrder = 0
34			end
35			object Label1: TLabel
36			Left = 12
37			Height = 14
38			Top = 56
39			Width = 95
40			Caption = 'Database Name'
41			ParentColor = False
42			end
43			object Edit2: TEdit
44			Left = 12
45			Height = 24
46			Top = 72
47			Width = 296
48			TabOrder = 1
49			end
50			object RadioButton1: TRadioButton
51			Left = 12
52			Height = 22
53			Top = 112
54			Width = 93
55			Caption = 'Server Side'
56			Checked = True
57			TabOrder = 2
58			TabStop = True
59			end
60			object RadioButton2: TRadioButton
61			Left = 134
62			Height = 22
63			Top = 112
64			Width = 88
65			Caption = 'Client Side'
66			TabOrder = 3
67			end
68			object Label3: TLabel
69			Left = 12
70			Height = 14
71			Top = 144
72			Width = 68
73			Caption = 'Backup File'
74			ParentColor = False
75			end
76			object Edit3: TEdit
77			Left = 12
78			Height = 24
79			Top = 160
80			Width = 288
81			TabOrder = 4
82			end
83			object SpeedButton1: TSpeedButton
84			Left = 310
85			Height = 25
86			Top = 160
87			Width = 25
88			Glyph.Data = {
89			36040000424D3604000000000000360000002800000010000000100000000100
90			2000000000000004000064000000640000000000000000000000000000000000
91			0000000000000000000000000000000000000000000000000000000000000000
92			0000000000000000000000000000000000000000000000000000000000000000
93			0000000000000000000000000000000000000000000000000000000000000000
94			0000000000000000000000000000000000000000000000000000000000000000
95			00002D88D8FF2D87D8FF2D88D8FF2D88D8FF2D88D8FF2D88D8FF2D88D8FF2D88
96			D8FF2D88D8FF2D88D8FF2D87D8FF2D88D8FF2C86D8FF0000000000000000338E
97			D9FFDCF0FAFFA7DDF4FF9EDBF4FF96DAF3FF8ED8F3FF86D7F3FF7FD4F2FF79D3
98			F2FF72D2F1FF6CD0F1FF69CFF1FFC2EAF8FF338ED9FF00000000000000003594
99			DAFFEFFAFEFFA1E9F9FF91E5F8FF81E1F7FF72DEF6FF63DAF5FF54D7F4FF47D3
100			F3FF39D0F2FF2ECDF1FF26CBF0FFCAF2FBFF3594DAFF0000000000000000369A
101			DAFFF2FAFDFFB3EDFAFFA4E9F9FF95E6F8FF85E2F7FF76DEF6FF65DBF5FF57D7
102			F4FF49D4F3FF3BD1F2FF30CEF1FFCCF2FBFF3598DAFF000000000000000036A1
103			DAFFF6FCFEFFC8F2FCFFB9EFFBFFACECFAFF9CE8F9FF8BE3F7FF7CE0F6FF6CDC
104			F6FF5DD9F5FF4FD6F4FF44D3F3FFD0F3FCFF359FDAFF000000000000000037A6
105			DAFFFEFFFFFFF8FDFFFFF6FDFFFFF5FCFFFFF3FCFEFFD8F6FCFF94E6F8FF85E3
106			F7FF76DFF6FF68DBF5FF5CD8F4FFD7F4FCFF35A4DAFF000000000000000035AB
107			DAFFE8F6FBFF94D4EFFF88CEEEFF73C1E9FFC9E9F6FFF2FCFEFFF3FCFEFFF2FC
108			FEFFF0FCFEFFEFFBFEFFEEFBFEFFFEFFFFFF36ABDAFF000000000000000036AA
109			DAFFF1FAFDFF94DEF5FF93DCF4FF81D5F2FF6ACAEDFF6CCBEAFF85D3EFFF80D2
110			EFFF7AD0EFFF76CFEEFF72CFEEFFE9F7FBFF34AEDAFF000000000000000035AF
111			DAFFF7FCFEFF8EE4F8FF91DEF5FF9FE0F5FFACE1F6FFEFFBFEFFF4FDFEFFF3FC
112			FEFFF1FCFEFFEFFBFEFFEEFBFEFFFAFDFFFF36AFDAFF000000000000000036B3
113			DAFFFDFEFEFFFEFFFFFFFEFEFFFFFDFEFFFFFEFFFFFFEAF7FBFF6BC7E4FF6BC7
114			E3FF6BC7E3FF6BC7E3FF79CDE6FF74CAE5FF00000000000000000000000034B4
115			D9FF5EC2E1FF60C3E2FF60C3E2FF60C3E2FF5FC3E2FF3CB6DBFF000000000000
116			0000000000000000000000000000000000000000000000000000000000000000
117			0000000000000000000000000000000000000000000000000000000000000000
118			0000000000000000000000000000000000000000000000000000000000000000
119			0000000000000000000000000000000000000000000000000000000000000000
120			0000000000000000000000000000000000000000000000000000000000000000
121			0000000000000000000000000000000000000000000000000000000000000000
122			0000000000000000000000000000000000000000000000000000
123			}
124			OnClick = SpeedButton1Click
125			end
126			object Button1: TButton
127			Left = 96
128			Height = 25
129			Top = 232
130			Width = 75
131			Caption = 'OK'
132			Default = True
133			ModalResult = 1
134			TabOrder = 5
135			end
136			object Button2: TButton
137			Left = 191
138			Height = 25
139			Top = 232
140			Width = 75
141			Cancel = True
142			Caption = 'Cancel'
143			ModalResult = 2
144			TabOrder = 6
145			end
146			object CheckBox1: TCheckBox
147			Left = 12
148			Height = 22
149			Top = 192
150			Width = 182
151			Caption = 'Replace Existing Database'
152			TabOrder = 7
153			end
154			object OpenDialog1: TOpenDialog
155			Title = 'Open existing backup file'
156			DefaultExt = '.gbk'
157			Filter = 'Backup Files\|.gbk\|All Files\|.*'
158			Options = [ofFileMustExist, ofEnableSizing, ofViewDetail]
159			left = 312
160			top = 104
161			end
162			object IBRestoreService1: TIBRestoreService
163			ServerName = 'localhost'
164			Protocol = TCP
165			Params.Strings = (
166			'user_name=SYSDBA'
167			)
168			TraceFlags = []
169			Verbose = True
170			StatisticsRequested = [bsTotalTime]
171			BackupFileLocation = flClientSide
172			DatabaseName.Strings = (
173			'/tmp/mytest.fdb'
174			)
175			PageSize = 0
176			PageBuffers = 0
177			left = 272
178			top = 16
179			end
180			end