9 |
|
OnClose = FormClose |
10 |
|
OnShow = FormShow |
11 |
|
Position = poMainFormCenter |
12 |
< |
LCLVersion = '1.8.1.0' |
12 |
> |
LCLVersion = '1.8.3.0' |
13 |
|
object Button1: TButton |
14 |
|
Left = 128 |
15 |
|
Height = 25 |
54 |
|
Caption = 'Server' |
55 |
|
ParentColor = False |
56 |
|
end |
57 |
< |
object Edit1: TEdit |
57 |
> |
object ServerName: TEdit |
58 |
|
Left = 12 |
59 |
|
Height = 24 |
60 |
|
Top = 24 |
78 |
|
ReadOnly = True |
79 |
|
TabOrder = 1 |
80 |
|
end |
81 |
< |
object RadioButton1: TRadioButton |
81 |
> |
object ServerSideBtn: TRadioButton |
82 |
|
Left = 12 |
83 |
|
Height = 22 |
84 |
|
Top = 112 |
85 |
|
Width = 93 |
86 |
|
Caption = 'Server Side' |
87 |
– |
Checked = True |
87 |
|
TabOrder = 2 |
89 |
– |
TabStop = True |
88 |
|
end |
89 |
< |
object RadioButton2: TRadioButton |
89 |
> |
object ClientSideBtn: TRadioButton |
90 |
|
Left = 134 |
91 |
|
Height = 22 |
92 |
|
Top = 112 |
93 |
|
Width = 88 |
94 |
|
Caption = 'Client Side' |
95 |
+ |
Checked = True |
96 |
|
TabOrder = 3 |
97 |
+ |
TabStop = True |
98 |
|
end |
99 |
|
object Label3: TLabel |
100 |
|
Left = 12 |
272 |
|
left = 368 |
273 |
|
top = 24 |
274 |
|
end |
275 |
< |
object IBRestoreService1: TIBRestoreService |
276 |
< |
ServerName = 'localhost' |
277 |
< |
Protocol = TCP |
278 |
< |
Params.Strings = ( |
279 |
< |
'user_name=SYSDBA' |
280 |
< |
) |
275 |
> |
object IBXClientSideRestoreService1: TIBXClientSideRestoreService |
276 |
> |
ServicesConnection = DatabaseData.IBXServicesConnection1 |
277 |
|
TraceFlags = [] |
278 |
< |
Verbose = True |
278 |
> |
OnGetNextLine = IBXClientSideRestoreService1GetNextLine |
279 |
> |
PageSize = 0 |
280 |
> |
PageBuffers = 0 |
281 |
> |
Options = [Replace] |
282 |
|
StatisticsRequested = [bsTotalTime] |
283 |
< |
BackupFileLocation = flClientSide |
284 |
< |
DatabaseName.Strings = ( |
285 |
< |
'/tmp/mytest.fdb' |
286 |
< |
) |
283 |
> |
Verbose = True |
284 |
> |
left = 224 |
285 |
> |
top = 208 |
286 |
> |
end |
287 |
> |
object IBXServerSideRestoreService1: TIBXServerSideRestoreService |
288 |
> |
ServicesConnection = DatabaseData.IBXServicesConnection1 |
289 |
> |
TraceFlags = [] |
290 |
> |
OnGetNextLine = IBXClientSideRestoreService1GetNextLine |
291 |
|
PageSize = 0 |
292 |
|
PageBuffers = 0 |
293 |
|
Options = [Replace] |
294 |
< |
left = 272 |
295 |
< |
top = 16 |
294 |
> |
StatisticsRequested = [bsTotalTime] |
295 |
> |
Verbose = True |
296 |
> |
left = 232 |
297 |
> |
top = 32 |
298 |
|
end |
299 |
|
end |