-
Notifications
You must be signed in to change notification settings - Fork 6
Expand file tree
/
Copy pathScriptComparerForm.dfm
More file actions
324 lines (324 loc) · 10.8 KB
/
ScriptComparerForm.dfm
File metadata and controls
324 lines (324 loc) · 10.8 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
object Form1: TForm1
Left = -2
Top = 103
Width = 640
Height = 400
Caption = 'Script Comparer (Demo)'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Shell Dlg 2'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
DesignSize = (
632
373)
PixelsPerInch = 96
TextHeight = 13
object BtnSelM: TSpeedButton
Left = 240
Top = 24
Width = 25
Height = 22
Hint = 'Select master database'
Glyph.Data = {
36050000424D3605000000000000360400002800000010000000100000000100
0800000000000001000000000000000000000001000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A6000020400000206000002080000020A0000020C0000020E000004000000040
20000040400000406000004080000040A0000040C0000040E000006000000060
20000060400000606000006080000060A0000060C0000060E000008000000080
20000080400000806000008080000080A0000080C0000080E00000A0000000A0
200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
20004000400040006000400080004000A0004000C0004000E000402000004020
20004020400040206000402080004020A0004020C0004020E000404000004040
20004040400040406000404080004040A0004040C0004040E000406000004060
20004060400040606000406080004060A0004060C0004060E000408000004080
20004080400040806000408080004080A0004080C0004080E00040A0000040A0
200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
20008000400080006000800080008000A0008000C0008000E000802000008020
20008020400080206000802080008020A0008020C0008020E000804000008040
20008040400080406000804080008040A0008040C0008040E000806000008060
20008060400080606000806080008060A0008060C0008060E000808000008080
20008080400080806000808080008080A0008080C0008080E00080A0000080A0
200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FDFDFDFDFDFD
FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD0B0B0B0B
0B0B0B0B0B0BFDFDFDFDFD1E1E1E1E1E1E1E1E1E1E1E0BFDFDFD1E1EBFFBFBFB
FBFBFBFBFBFB1E01FDFD1E1EFBBFFBFBFBFBFBFBFBFB2F01FDFD1E2737BFFBFB
FBFBFBFBFBFB3701FDFD1E2F27BF7F7F7F7F7F7F7F7F373701FD1EFB1E7FBFBF
BFBFBFBFBFBF377F01FD1EFB1E37FFFFFFFFFFFFFFFFFBFF01FD1EFB371E1E1E
1E1E1E1E1E1E1E1E01FD1EBF7F7F7F7F7FFFFFFFFFFF1E0BFDFD1EFFBFBFBFBF
FF1E1E1E1E1E1EFDFDFDFD27FFFFFFFF1EFDFDFDFDFDFDFDFDFDFDFD27272727
FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD}
ParentShowHint = False
ShowHint = True
OnClick = BtnSelClick
end
object BtnSelT: TSpeedButton
Left = 504
Top = 24
Width = 25
Height = 22
Hint = 'Select target database'
Glyph.Data = {
36050000424D3605000000000000360400002800000010000000100000000100
0800000000000001000000000000000000000001000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A6000020400000206000002080000020A0000020C0000020E000004000000040
20000040400000406000004080000040A0000040C0000040E000006000000060
20000060400000606000006080000060A0000060C0000060E000008000000080
20000080400000806000008080000080A0000080C0000080E00000A0000000A0
200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
20004000400040006000400080004000A0004000C0004000E000402000004020
20004020400040206000402080004020A0004020C0004020E000404000004040
20004040400040406000404080004040A0004040C0004040E000406000004060
20004060400040606000406080004060A0004060C0004060E000408000004080
20004080400040806000408080004080A0004080C0004080E00040A0000040A0
200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
20008000400080006000800080008000A0008000C0008000E000802000008020
20008020400080206000802080008020A0008020C0008020E000804000008040
20008040400080406000804080008040A0008040C0008040E000806000008060
20008060400080606000806080008060A0008060C0008060E000808000008080
20008080400080806000808080008080A0008080C0008080E00080A0000080A0
200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FDFDFDFDFDFD
FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD0B0B0B0B
0B0B0B0B0B0BFDFDFDFDFD1E1E1E1E1E1E1E1E1E1E1E0BFDFDFD1E1EBFFBFBFB
FBFBFBFBFBFB1E01FDFD1E1EFBBFFBFBFBFBFBFBFBFB2F01FDFD1E2737BFFBFB
FBFBFBFBFBFB3701FDFD1E2F27BF7F7F7F7F7F7F7F7F373701FD1EFB1E7FBFBF
BFBFBFBFBFBF377F01FD1EFB1E37FFFFFFFFFFFFFFFFFBFF01FD1EFB371E1E1E
1E1E1E1E1E1E1E1E01FD1EBF7F7F7F7F7FFFFFFFFFFF1E0BFDFD1EFFBFBFBFBF
FF1E1E1E1E1E1EFDFDFDFD27FFFFFFFF1EFDFDFDFDFDFDFDFDFDFDFD27272727
FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD}
ParentShowHint = False
ShowHint = True
OnClick = BtnSelClick
end
object Label1: TLabel
Left = 8
Top = 8
Width = 122
Height = 13
Caption = 'Master database script...'
end
object Label2: TLabel
Left = 272
Top = 8
Width = 121
Height = 13
Caption = 'Target database script...'
end
object fnScriptM: TEdit
Left = 8
Top = 24
Width = 233
Height = 21
TabOrder = 0
end
object FnScriptT: TEdit
Left = 272
Top = 24
Width = 233
Height = 21
TabOrder = 1
end
object rbIB: TRadioButton
Left = 8
Top = 48
Width = 97
Height = 17
Caption = 'InterBase / FB'
Checked = True
TabOrder = 2
TabStop = True
end
object rbSAW: TRadioButton
Left = 112
Top = 48
Width = 65
Height = 17
Caption = 'Sybase'
TabOrder = 3
end
object rbMy: TRadioButton
Left = 184
Top = 48
Width = 65
Height = 17
Caption = 'MySQL'
TabOrder = 4
end
object rbOra: TRadioButton
Left = 256
Top = 48
Width = 65
Height = 17
Caption = 'Oracle'
TabOrder = 5
end
object rbMS: TRadioButton
Left = 328
Top = 48
Width = 65
Height = 17
Caption = 'MS SQL'
TabOrder = 6
end
object BtnExtract: TBitBtn
Left = 544
Top = 8
Width = 75
Height = 25
Caption = 'Extract'
TabOrder = 7
OnClick = BtnExtractClick
end
object BtnCompare: TBitBtn
Left = 544
Top = 40
Width = 75
Height = 25
Caption = 'Compare'
TabOrder = 8
OnClick = BtnCompareClick
end
object Panel1: TPanel
Left = 8
Top = 72
Width = 617
Height = 297
Anchors = [akLeft, akTop, akRight, akBottom]
Caption = 'Panel1'
TabOrder = 9
object Splitter1: TSplitter
Left = 1
Top = 105
Width = 615
Height = 3
Cursor = crVSplit
Align = alTop
Beveled = True
end
object MemoLog: TRichEdit
Left = 1
Top = 1
Width = 615
Height = 104
Align = alTop
Lines.Strings = (
'< Log >')
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 0
end
object MemoScript: TRichEdit
Left = 1
Top = 108
Width = 615
Height = 188
Align = alClient
Lines.Strings = (
'< Result script >')
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 1
end
end
object ProgressBar: TProgressBar
Left = 400
Top = 48
Width = 129
Height = 16
TabOrder = 10
end
object OpenDialog1: TOpenDialog
Left = 592
Top = 72
end
object DBComparer: TDBComparer
DBStructureMaster = DBStructureMaster
DBStructureTarget = DBStructureTarget
OnProgressUpdate = DBComparerProgressUpdate
OnLogNextLine = DBComparerLogNextLine
OnErrorMessage = DBComparerErrorMessage
OnBeforeExtract = DBComparerBeforeExtract
OnBeforeExtractTarget = DBComparerBeforeExtractTarget
OnBeforeExtractMaster = DBComparerBeforeExtractMaster
Left = 136
Top = 216
end
object DBStructureMaster: TDBStructure
Left = 208
Top = 184
end
object DBStructureTarget: TDBStructure
Left = 208
Top = 248
end
object IBScriptExtract: TIBScriptExtract
OnProgressUpdate = DBComparerProgressUpdate
OnLogNextLine = DBComparerLogNextLine
OnErrorMessage = DBComparerErrorMessage
Left = 328
Top = 184
end
object SAWScriptExtract: TASAScriptExtract
OnProgressUpdate = DBComparerProgressUpdate
OnLogNextLine = DBComparerLogNextLine
OnErrorMessage = DBComparerErrorMessage
Left = 440
Top = 184
end
object MySQLScriptExtract: TMySQLScriptExtract
OnProgressUpdate = DBComparerProgressUpdate
OnLogNextLine = DBComparerLogNextLine
OnErrorMessage = DBComparerErrorMessage
Left = 544
Top = 184
end
object OracleScriptExtract: TOracleScriptExtract
OnProgressUpdate = DBComparerProgressUpdate
OnLogNextLine = DBComparerLogNextLine
OnErrorMessage = DBComparerErrorMessage
Left = 328
Top = 248
end
object MSSQLScriptExtract: TMSSQLScriptExtract
OnProgressUpdate = DBComparerProgressUpdate
OnLogNextLine = DBComparerLogNextLine
OnErrorMessage = DBComparerErrorMessage
Left = 440
Top = 248
end
end