ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/services/BackupDlgUnit.lfm
Revision: 143
Committed: Fri Feb 23 12:11:21 2018 UTC (6 years, 9 months ago) by tony
File size: 4931 byte(s)
Log Message:
Fixes Merged

File Contents

# User Rev Content
1 tony 143 object BackupDlg: TBackupDlg
2     Left = 809
3     Height = 242
4     Top = 271
5     Width = 374
6     Caption = 'Backup Database'
7     ClientHeight = 242
8     ClientWidth = 374
9     OnClose = FormClose
10     OnShow = FormShow
11     Position = poMainFormCenter
12     LCLVersion = '1.8.1.0'
13     object Bevel1: TBevel
14     Left = 3
15     Height = 198
16     Top = 2
17     Width = 347
18     end
19     object Label1: TLabel
20     Left = 12
21     Height = 14
22     Top = 56
23     Width = 95
24     Caption = 'Database Name'
25     ParentColor = False
26     end
27     object Label2: TLabel
28     Left = 12
29     Height = 14
30     Top = 7
31     Width = 39
32     Caption = 'Server'
33     ParentColor = False
34     end
35     object Edit1: TEdit
36     Left = 12
37     Height = 24
38     Top = 24
39     Width = 180
40     ReadOnly = True
41     TabOrder = 0
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 Label3: TLabel
51     Left = 12
52     Height = 14
53     Top = 144
54     Width = 68
55     Caption = 'Backup File'
56     ParentColor = False
57     end
58     object RadioButton1: TRadioButton
59     Left = 12
60     Height = 22
61     Top = 112
62     Width = 93
63     Caption = 'Server Side'
64     TabOrder = 2
65     end
66     object RadioButton2: TRadioButton
67     Left = 134
68     Height = 22
69     Top = 112
70     Width = 88
71     Caption = 'Client Side'
72     Checked = True
73     TabOrder = 3
74     TabStop = True
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 = 208
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 = 208
140     Width = 75
141     Cancel = True
142     Caption = 'Cancel'
143     ModalResult = 2
144     TabOrder = 6
145     end
146     object IBBackupService1: TIBBackupService
147     ServerName = 'localhost'
148     Protocol = TCP
149     Params.Strings = (
150     'user_name=SYSDBA'
151     ''
152     )
153     TraceFlags = []
154     Verbose = True
155     StatisticsRequested = [bsTotalTime]
156     BackupFileLocation = flClientSide
157     BlockingFactor = 0
158     DatabaseName = 'employee'
159     Options = [NoDBTriggers]
160     left = 312
161     top = 24
162     end
163     object SaveDialog1: TSaveDialog
164     DefaultExt = '.gbk'
165     Filter = 'Backup Files|*.gbk|All Files|*.*'
166     Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing, ofViewDetail]
167     left = 309
168     top = 120
169     end
170     end