ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/services/RestoreDlgUnit.lfm
(Generate patch)

Comparing ibx/trunk/examples/services/RestoreDlgUnit.lfm (file contents):
Revision 208 by tony, Fri Feb 23 12:11:21 2018 UTC vs.
Revision 209 by tony, Wed Mar 14 12:48:51 2018 UTC

# Line 9 | Line 9 | object RestoreDlg: TRestoreDlg
9    OnClose = FormClose
10    OnShow = FormShow
11    Position = poMainFormCenter
12 <  LCLVersion = '1.8.1.0'
12 >  LCLVersion = '1.8.3.0'
13    object Bevel1: TBevel
14      Left = 3
15      Height = 222
# Line 24 | Line 24 | object RestoreDlg: TRestoreDlg
24      Caption = 'Server'
25      ParentColor = False
26    end
27 <  object Edit1: TEdit
27 >  object ServerName: TEdit
28      Left = 12
29      Height = 24
30      Top = 24
# Line 40 | Line 40 | object RestoreDlg: TRestoreDlg
40      Caption = 'Database Name'
41      ParentColor = False
42    end
43 <  object Edit2: TEdit
43 >  object DBName: TEdit
44      Left = 12
45      Height = 24
46      Top = 72
47      Width = 296
48      TabOrder = 1
49    end
50 <  object RadioButton1: TRadioButton
50 >  object ServerSideBtn: TRadioButton
51      Left = 12
52      Height = 22
53      Top = 112
54      Width = 93
55      Caption = 'Server Side'
56 –    Checked = True
56      TabOrder = 2
58 –    TabStop = True
57    end
58 <  object RadioButton2: TRadioButton
58 >  object ClientSideBtn: TRadioButton
59      Left = 134
60      Height = 22
61      Top = 112
62      Width = 88
63      Caption = 'Client Side'
64 +    Checked = True
65      TabOrder = 3
66 +    TabStop = True
67    end
68    object Label3: TLabel
69      Left = 12
# Line 73 | Line 73 | object RestoreDlg: TRestoreDlg
73      Caption = 'Backup File'
74      ParentColor = False
75    end
76 <  object Edit3: TEdit
76 >  object BackupFileName: TEdit
77      Left = 12
78      Height = 24
79      Top = 160
# Line 143 | Line 143 | object RestoreDlg: TRestoreDlg
143      ModalResult = 2
144      TabOrder = 6
145    end
146 <  object CheckBox1: TCheckBox
146 >  object ReplaceExisting: TCheckBox
147      Left = 12
148      Height = 22
149      Top = 192
# Line 159 | Line 159 | object RestoreDlg: TRestoreDlg
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 <    )
162 >  object CSRestoreService1: TIBXClientSideRestoreService
163 >    ServicesConnection = MainForm.IBXServicesConnection1
164      TraceFlags = []
165 <    Verbose = True
165 >    PageSize = 0
166 >    PageBuffers = 0
167      StatisticsRequested = [bsTotalTime]
168 <    BackupFileLocation = flClientSide
169 <    DatabaseName.Strings = (
170 <      '/tmp/mytest.fdb'
171 <    )
168 >    Verbose = True
169 >    left = 101
170 >    top = 21
171 >  end
172 >  object SSRestoreService1: TIBXServerSideRestoreService
173 >    ServicesConnection = MainForm.IBXServicesConnection1
174 >    TraceFlags = []
175 >    OnGetNextLine = IBRestoreService1GetNextLine
176      PageSize = 0
177      PageBuffers = 0
178 <    left = 272
179 <    top = 16
178 >    StatisticsRequested = [bsTotalTime]
179 >    Verbose = True
180 >    left = 226
181 >    top = 19
182    end
183   end

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines