ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/services/RestoreDlgUnit.lfm
Revision: 209
Committed: Wed Mar 14 12:48:51 2018 UTC (6 years, 1 month ago) by tony
File size: 5323 byte(s)
Log Message:
Fixes Merged

File Contents

# 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 tony 209 LCLVersion = '1.8.3.0'
13 tony 143 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 tony 209 object ServerName: TEdit
28 tony 143 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 tony 209 object DBName: TEdit
44 tony 143 Left = 12
45     Height = 24
46     Top = 72
47     Width = 296
48     TabOrder = 1
49     end
50 tony 209 object ServerSideBtn: TRadioButton
51 tony 143 Left = 12
52     Height = 22
53     Top = 112
54     Width = 93
55     Caption = 'Server Side'
56     TabOrder = 2
57     end
58 tony 209 object ClientSideBtn: TRadioButton
59 tony 143 Left = 134
60     Height = 22
61     Top = 112
62     Width = 88
63     Caption = 'Client Side'
64 tony 209 Checked = True
65 tony 143 TabOrder = 3
66 tony 209 TabStop = True
67 tony 143 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 tony 209 object BackupFileName: TEdit
77 tony 143 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 tony 209 object ReplaceExisting: TCheckBox
147 tony 143 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 tony 209 object CSRestoreService1: TIBXClientSideRestoreService
163     ServicesConnection = MainForm.IBXServicesConnection1
164 tony 143 TraceFlags = []
165 tony 209 PageSize = 0
166     PageBuffers = 0
167     StatisticsRequested = [bsTotalTime]
168 tony 143 Verbose = True
169 tony 209 left = 101
170     top = 21
171     end
172     object SSRestoreService1: TIBXServerSideRestoreService
173     ServicesConnection = MainForm.IBXServicesConnection1
174     TraceFlags = []
175     OnGetNextLine = IBRestoreService1GetNextLine
176 tony 143 PageSize = 0
177     PageBuffers = 0
178 tony 209 StatisticsRequested = [bsTotalTime]
179     Verbose = True
180     left = 226
181     top = 19
182 tony 143 end
183     end