-
Notifications
You must be signed in to change notification settings - Fork 3
/
Countries.dfm
589 lines (589 loc) · 26.5 KB
/
Countries.dfm
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
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
inherited frmCountries: TfrmCountries
Left = 197
Top = 175
Caption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1089#1090#1088#1072#1085
Icon.Data = {
0000010001002020180000000000A80C00001600000028000000200000004000
00000100180000000000000C0000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000DC9200DC9200DC9200DC9200DC9200DC9200DC9200000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000FFAA25FFAA25FFAA25FFAA25
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000960000960000960000
B90000B90000B90000B90000B90000B90000B900000000FFAA25FFAA25FFAA25
FFAA250000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000960000960000960000B90000B90000
000000000000000000B900000000000000000000FFB848FFB848FFB848FFB848
FFB848FFB848FFB8480000000000000000000000000000000000000000000000
0000000000000000000000000000960000960000B90000B90000B90000000000
B900FFB848FFB848000000000000FFB848FFB848FFB848FFB848FFB848FFB848
FFB848FFB848FFB848FFB8480000000000000000000000000000000000000000
0000000000000000000000000000960000960000B90000B90000B90000000000
000000000000000000DC0000DC00000000FFB848FFB848FFB848FFB848FFB848
FFB848FFB848FFB848FFB848FFB8480000000000000000000000000000000000
0000000000000000000000960000960000B90000B90000B90000B90000DC0000
DC0000DC0000DC00000000000000FFB848FFB848000000000000FFB848FFB848
FFB848FFB848FFB848FFB8480000000000000000000000000000000000000000
0000000000000000000000960000960000B90000B90000B90000DC0000DC0000
DC0000DC00000000FFB848FFB848FFB84800000073FF4873FF48000000FFC66B
FFC66BFFB848FFB84800000025FF2525FF250000000000000000000000000000
0000000000000000000000960000960000B90000B90000DC0000DC0000DC0000
DC0000DC0000DC0000000000000000000073FF4873FF48000000FFC66B000000
000000FFC66B00000000000025FF250000000000000000000000000000000000
00000000000000DC920000000000000000B90000DC0000DC0000DC0000DC0000
DC0000DC0000DC0073FF4873FF4873FF4873FF48000000FFC66B0000006BFF6B
0000000000006BFF6B6BFF6B000000FFB848FFB8480000000000000000000000
00000000000000DC9200DC920000000000B90000DC0000DC0000DC0000DC0000
DC0000DC0073FF4873FF4873FF4873FF48000000FFC66B0000006BFF6B000000
0000006BFF6B6BFF6B6BFF6B6BFF6B000000FFB8480000000000000000000000
00000000000000DC920000000000B90000DC0000DC0000DC0000DC0000DC0000
DC0073FF4873FF4873FF4873FF4873FF4873FF480000000000006BFF6B000000
6BFF6B6BFF6B6BFF6B6BFF6B6BFF6B000000FFB8480000000000000000000000
00000000000000DC9200DC920000000000DC0000DC0000DC0000DC0000000000
DC0073FF4873FF4873FF4873FF4873FF4873FF4873FF4873FF486BFF6B6BFF6B
6BFF6B0000006BFF6B6BFF6B6BFF6B000000FFB8480000000000000000000000
00000000000000DC9200DC9200FFAA2500000000DC0000DC00000000FFB84800
000073FF4873FF4873FF4873FF4873FF4873FF486BFF6B6BFF6B6BFF6B6BFF6B
000000FFC66B0000006BFF6B6BFF6B6BFF6B0000000000000000000000000000
00000000000000DC9200DC9200FFAA2500000000DC00000000FFB848FFB848FF
B84800000073FF4873FF4873FF4873FF4873FF486BFF6B000000000000000000
FFC66BFFC66BFFC66B0000000000006BFF6B0000000000000000000000000000
00000000000000000000DC9200FFAA2500000000DC00000000FFB848FFB848FF
C66BFFC66B00000073FF4873FF4873FF4873FF486BFF6B000000FFC66BFFC66B
FFC66BFFC66BFFC66BFFC66B0000006BFF6B0000000000000000000000000000
00000000000000000000DC9200DC9200FFAA25000000000000FFB848FFB848FF
C66BFFC66B00000073FF4873FF4873FF4873FF48000000FFC66BFFC66BFFC66B
FFC66BFFC66BFFC66BFFC66BFFC66B0000000000000000000000000000000000
00000000000000000000000000000000FFAA2500000000DC00000000FFB848FF
C66BFFC66B00000073FF486BFF6B6BFF6B000000FFC66BFFC66BFFC66BFFC66B
FFC66BFFC66BFFC66BFFC66BFFC66B0000000000000000000000000000000000
00000000000000000000000000009600000000FFAA2500000000DC00000000FF
B848FFC66B0000006BFF6B6BFF6B000000FFC66BFFC66BFFC66BFFC66BFFC66B
FFC66BFFC66BFFC66BFFC66BFFC66B0000000000000000000000000000000000
0000000000000000000000000000000000960000000000000000DC00000000FF
B848FFC66BFFC66B000000000000FFC66BFFC66BFFC66BFFC66BFFC66BFFC66B
FFC66BFFC66BFFC66BFFC66BFFC66B0000000000000000000000000000000000
0000000000000000000000000000000000000000B90000B90000DC0000DC0000
0000FFB848FFC66BFFC66BFFC66BFFC66BFFC66BFFC66BFFC66BFFC66BFFC66B
FFC66B000000000000FFC66B0000000000000000000000000000000000000000
0000000000000000000000000000000000000000960000B90000B90000DC0000
0000FFB848FFB848FFC66BFFC66BFFC66BFFC66BFFC66B000000000000000000
00000000DC0000DC000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000960000B90000DC0000
DC00000000000000FFB848FFB848FFC66B00000000000000000000DC0000DC00
00DC0000DC000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000960000
DC0000DC0000DC00000000FFB84800000000DC0000DC0000DC0000DC0000DC00
00B9000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000FFB84800000000B90000B90000B90000B90000B90000B900
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000000FFFF
FFFFFFFFFFFFFFFFFFFFFFF01FFFFFFFC3FFFF0021FFFC1DC07FF823003FF83C
801FF003303FF004484FF00396DFEC002B27E4005617E8003417E4200117E250
028FE2881C6FF284102FF184201FFD44401FFAA4801FFDA3001FFE1001BFFE10
1E7FFF0C70FFFFC281FFFFFD03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel [0]
Left = 0
Top = 0
Width = 517
Height = 348
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object wwDBGrid1: TwwDBGrid
Left = 2
Top = 2
Width = 513
Height = 344
DisableThemesInTitle = False
ControlType.Strings = (
'VALID;CheckBox;1;0'
'COMMENTS;RichEdit;wwDBRichEdit1')
Selected.Strings = (
'NAME'#9'37'#9#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077#9'F'
'KOD'#9'10'#9#1050#1086#1076'~'#1089#1090#1088#1072#1085#1099#9'F'
'VALID'#9'9'#9#1044#1077#1081#1089#1090#1074#1080'~'#1090#1077#1083#1100#1085#1099#1081#9'F'
'COMMENTS'#9'21'#9#1050#1086#1084#1084#1077#1085#1090#1072#1088#1080#1080#9'F')
MemoAttributes = [mSizeable, mWordWrap, mGridShow]
IniAttributes.Delimiter = ';;'
TitleColor = clBtnFace
FixedCols = 0
ShowHorzScrollBar = True
EditControlOptions = [ecoCheckboxSingleClick, ecoSearchOwnerForm]
Align = alClient
DataSource = dsMainCountries
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap, dgNoLimitColSize, dgTrailingEllipsis, dgShowCellHint, dgTabExitsOnLastCol, dgProportionalColResize, dgRowResize]
ParentFont = False
TabOrder = 0
TitleAlignment = taCenter
TitleFont.Charset = RUSSIAN_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'Arial'
TitleFont.Style = [fsBold]
TitleLines = 2
TitleButtons = True
UseTFields = False
OnCalcCellColors = wwDBGrid1CalcCellColors
OnTitleButtonClick = wwDBGrid1TitleButtonClick
OnCalcTitleImage = wwDBGrid1CalcTitleImage
TitleImageList = frmDM.ImageList2
PadColumnStyle = pcsPlain
end
object wwDBRichEdit1: TwwDBRichEdit
Left = 280
Top = 112
Width = 185
Height = 89
AutoURLDetect = False
DataField = 'COMMENTS'
DataSource = dsMainCountries
PrintJobName = 'Delphi 5'
TabOrder = 1
EditorCaption = 'Edit Rich Text'
EditorPosition.Left = 0
EditorPosition.Top = 0
EditorPosition.Width = 0
EditorPosition.Height = 0
MeasurementUnits = muInches
PrintMargins.Top = 1.000000000000000000
PrintMargins.Bottom = 1.000000000000000000
PrintMargins.Left = 1.000000000000000000
PrintMargins.Right = 1.000000000000000000
PrintHeader.VertMargin = 0.500000000000000000
PrintHeader.Font.Charset = DEFAULT_CHARSET
PrintHeader.Font.Color = clWindowText
PrintHeader.Font.Height = -11
PrintHeader.Font.Name = 'MS Sans Serif'
PrintHeader.Font.Style = []
PrintFooter.VertMargin = 0.500000000000000000
PrintFooter.Font.Charset = DEFAULT_CHARSET
PrintFooter.Font.Color = clWindowText
PrintFooter.Font.Height = -11
PrintFooter.Font.Name = 'MS Sans Serif'
PrintFooter.Font.Style = []
RichEditVersion = 2
Data = {
810000007B5C727466315C616E73695C616E7369637067313235315C64656666
305C6465666C616E67313034397B5C666F6E7474626C7B5C66305C666E696C20
4D532053616E732053657269663B7D7D0D0A5C766965776B696E64345C756331
5C706172645C66305C6673313620777744425269636845646974315C7061720D
0A7D0D0A00}
end
end
object Panel4: TPanel [1]
Left = 517
Top = 0
Width = 19
Height = 348
Align = alRight
BevelOuter = bvNone
TabOrder = 1
object sbCancelCountries: TSpeedButton
Left = 0
Top = 133
Width = 19
Height = 19
Cursor = crHandPoint
Hint =
#1054#1090#1084#1077#1085#1080#1090#1100' '#1074#1089#1077#13#10#1089#1076#1077#1083#1072#1085#1085#1099#1077' '#1080#1079#1084#1077#1085#1077#1085#1080#1103'|'#1054#1090#1084#1077#1085#1080#1090#1100' '#1074#1089#1077' '#1089#1076#1077#1083#1072#1085#1085#1099#1077' '#1080#1079#1084#1077#1085#1077#1085 +
#1080#1103
AllowAllUp = True
Enabled = False
Flat = True
Glyph.Data = {
46010000424D460100000000000076000000280000001C0000000D0000000100
040000000000D000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333000033333333333333333FF33333FF330000333003333300
3333733F333733F3000033300033300033337333F37333F30000333300030003
3333373337333F330000333330000033333333733333F3330000333333000333
33333337333F33330000333330000033333333733333F3330000333300030003
3333373337333F33000033300033300033337333F37333F30000333003333300
3333733F333733F3000033333333333333333773333377330000333333333333
33333333333333330000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
Transparent = False
OnClick = sbCancelCountriesClick
end
object sbApplyCountries: TSpeedButton
Left = 0
Top = 114
Width = 19
Height = 19
Cursor = crHandPoint
Hint =
#1055#1088#1080#1084#1077#1085#1080#1090#1100' '#1074#1089#1077#13#10#1089#1076#1077#1083#1072#1085#1085#1099#1077' '#1080#1079#1084#1077#1085#1077#1085#1080#1103'|'#1055#1088#1080#1084#1077#1085#1080#1090#1100' '#1074#1089#1077' '#1089#1076#1077#1083#1072#1085#1085#1099#1077' '#1080#1079#1084#1077#1085 +
#1077#1085#1080#1103
AllowAllUp = True
Enabled = False
Flat = True
Glyph.Data = {
46010000424D460100000000000076000000280000001C0000000D0000000100
040000000000D000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333330000333333333333333333F3333333330000333303333333
33333F3F3333333300003330003333333333F333F33333330000330000033333
333F33333F33333300003000300033333373333333F333330000300333000333
337333F7333F33330000333333300033333777337333F3330000333333330003
3333333337333F33000033333333300033333333337333F30000333333333300
3333333333373373000033333333333333333333333377330000333333333333
33333333333333330000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
Transparent = False
OnClick = sbApplyCountriesClick
end
object sbDeleteCountries: TSpeedButton
Left = 0
Top = 95
Width = 19
Height = 19
Cursor = crHandPoint
Hint = #1059#1076#1072#1083#1080#1090#1100' '#1079#1072#1087#1080#1089#1100
AllowAllUp = True
Flat = True
Glyph.Data = {
46010000424D460100000000000076000000280000001C0000000D0000000100
040000000000D000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333000033333333333333333333333333330000333333333333
3333333333333333000033333333333333333333333333330000333333333333
3337FFFFFFFFFFF3000033000000000033373333333333F30000330000000000
33373333333333F3000033000000000033373333333333F30000333333333333
33377777777777F3000033333333333333333333333333330000333333333333
3333333333333333000033333333333333333333333333330000333333333333
33333333333333330000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
Transparent = False
OnClick = sbDeleteCountriesClick
end
object sbAddCountries: TSpeedButton
Left = 0
Top = 76
Width = 19
Height = 19
Cursor = crHandPoint
Hint = #1044#1086#1073#1072#1074#1080#1090#1100' '#1079#1072#1087#1080#1089#1100
AllowAllUp = True
Flat = True
Glyph.Data = {
46010000424D460100000000000076000000280000001C0000000D0000000100
040000000000D000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333300003333333333333333333FFFF333330000333330003333
3333337333F3333300003333300033333333337333F333330000333330003333
3333FF3333FFFF3300003300000000033337333333333F330000330000000003
3337333333333F3300003300000000033337333333333F330000333330003333
333777733337733300003333300033333333337333F333330000333330003333
3333337333F33333000033333333333333333377773333330000333333333333
33333333333333330000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
Transparent = False
OnClick = sbAddCountriesClick
end
object sbLastCountries: TSpeedButton
Left = 0
Top = 57
Width = 19
Height = 19
Cursor = crHandPoint
Hint = #1055#1086#1089#1083#1077#1076#1085#1103#1103' '#1079#1072#1087#1080#1089#1100
AllowAllUp = True
Flat = True
Glyph.Data = {
46010000424D460100000000000076000000280000001C0000000D0000000100
040000000000D000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333000033333333333333333333333333330000333333333333
3333FF333333FFF30000330733333370333733FF333733F30000330007333370
33373333FF3733F300003300000733703337333333F333F30000330000000770
33373333333333F3000033000007337033373333337733F30000330007333370
33373333773733F3000033073333337033373377333733F30000333333333333
3337773333377733000033333333333333333333333333330000333333333333
33333333333333330000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
Transparent = False
OnClick = sbLastCountriesClick
end
object sbNextCountries: TSpeedButton
Left = 0
Top = 38
Width = 19
Height = 19
Cursor = crHandPoint
Hint = #1055#1086#1089#1083#1077#1076#1091#1102#1097#1072#1103' '#1079#1072#1087#1080#1089#1100
AllowAllUp = True
Flat = True
Glyph.Data = {
12010000424D12010000000000007600000028000000140000000D0000000100
0400000000009C00000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333FFFF33333333333333333333CEEC33333333333FF3333333CDFC3073
333333733FF33333CDFC300073333373333FF333CDFC30000073337333333FF3
CCEC3000000073733333333FCFFD30000073337333333773EFFF300073333373
33377333EFFE30733333337337733333EEEE33333333337773333333FFFF3333
3333333333333333FFFF33333333333333333333FFFF}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
Transparent = False
OnClick = sbNextCountriesClick
end
object sbPriorCountries: TSpeedButton
Left = 0
Top = 19
Width = 19
Height = 19
Cursor = crHandPoint
Hint = #1055#1088#1077#1076#1099#1076#1091#1097#1072#1103' '#1079#1072#1087#1080#1089#1100
AllowAllUp = True
Flat = True
Glyph.Data = {
12010000424D12010000000000007600000028000000140000000D0000000100
0400000000009C00000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333335AAA33333333333333333333E11133333333333333333FFF5AAA3333
33370333333FF33FF0003333370003333FF3333FD22233370000033FF333333F
F0003700000003733333333FD2223337000003377333333F3000333337000333
3773333FD2223333333703333337733FF00033333333333333333773D2223333
3333333333333333F00033333333333333333333D222}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
Transparent = False
OnClick = sbPriorCountriesClick
end
object sbFirstCountries: TSpeedButton
Left = 0
Top = 0
Width = 19
Height = 19
Cursor = crHandPoint
Hint = #1055#1077#1088#1074#1072#1103' '#1079#1072#1087#1080#1089#1100
AllowAllUp = True
Flat = True
Glyph.Data = {
46010000424D460100000000000076000000280000001C0000000D0000000100
040000000000D000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333000033333333333333333333333333330000333333333333
3333FFF33333FFF30000330733333370333733F333FF33F30000330733337000
333733F3FF3333F30000330733700000333733FF333333F30000330770000000
33373333333333F3000033073370000033373337333333F30000330733337000
333733F3773333F30000330733333370333733F3337733F30000333333333333
3337773333337733000033333333333333333333333333330000333333333333
33333333333333330000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
Transparent = False
OnClick = sbFirstCountriesClick
end
object SpeedButton9: TSpeedButton
Left = 0
Top = 152
Width = 19
Height = 19
Cursor = crHandPoint
Hint = #1060#1080#1083#1100#1090#1088'/'#1087#1086#1080#1089#1082
AllowAllUp = True
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333300000000000033000FFFFFFFFFF030000FFFFFFF000000030FFFFFF07887
00330FFFFF0788E7F0330FFFFF08888780330FFFFF08E88780330FFFFF07EE87
F0330FFFFFF0788703330FFFFFFF000033330FFFFFFFFFF033330FFFFFFF0000
33330FFFFFFF080333330FFFFFFF003333330000000003333333}
ParentShowHint = False
ShowHint = True
Transparent = False
end
object sbCloseCountries: TSpeedButton
Left = 0
Top = 171
Width = 19
Height = 19
Cursor = crHandPoint
Hint = #1047#1072#1082#1088#1099#1090#1100
AllowAllUp = True
Flat = True
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000120B0000120B00000000000000000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8A8A87969F99000000FF
FFFFFFFFFFFFFFFF9E9C9EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFF0F6EEFFFFFF494D520000008889866D706E000000000000D1CB
CFD7D5D0000000FFFFFFFFFFFFFFFFFFFFFFFF7E7F7FFFFFFF7C7C794F5C5565
66620B0906959595FFFFFFF9FFFCFFFFFF040B04000000FFFFFF7F7F7D000000
FFFFFFFFFFFFF7F9F0000000000000000000000000000000545A57FFFFFFFFFF
FF000000C0BFBCFFFFFFEDF3EF0000000D0F0CC5CACE00000000000000080000
0B00000800000000000000000000FFFFFF3C3D3BFFFFFFFFFFFFBDBDBCFFFFFF
272D28000000000000000400000A00000800000900000B000009000000004347
3F484B46FFFFFFFFFFFFFFFFFFFFFFFFDBE5E7000000000500000B0000080000
0800000800000800000B00000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF
C6CCC0000000000000000A00000800000800000800000800000B000000000000
00484F4DBEBDB9FFFFFFFFFFFF959E9843463A000000000000000B0000080000
0800000800000800000C00000000050E00FFFFFF000000FFFFFF8A8889D0D3C8
D2D6D6000000000000000900000B00000900000900000A00000E000000007177
6CFFFFFF000000FCFAFFD4D6D6FFFFFFFFFFFF6A756E00000000000000000000
0900000C00000500000000000000C7CBCCFFFFFF909687000000FFFFFFFFFFFF
D9D7D98F9291C8C4C2000000000000000000000000000000000000272E280000
00AAAAACC4C4C4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF33363300
0000000000000000C2C3C3FFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFF0000004E4E4FDEDDE3F6F6F3DDDBDBFFFFFF0000
00F8FBFCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE1E4DF595B59FF
FFFFFFFFFFFFFFFFFFFFFFFFFFFF888785FFFFFFFFFFFFFFFFFF}
ParentShowHint = False
ShowHint = True
Transparent = False
OnClick = sbCloseCountriesClick
end
end
inherited trMain: TIBTransaction
DefaultDatabase = frmDM.dbMain
end
inherited ibsGen_ID: TIBSQL
Left = 40
Top = 94
end
object ibsWhite: TIBSQL
Database = frmDM.dbWhite
Transaction = trMain
Left = 40
Top = 64
end
object ibdsMainCountries: TIBDataSet
Database = frmDM.dbMain
Transaction = trMain
AfterScroll = ibdsMainCountriesAfterScroll
OnNewRecord = ibdsMainCountriesNewRecord
OnUpdateRecord = ibdsMainCountriesUpdateRecord
BufferChunks = 500
CachedUpdates = True
DeleteSQL.Strings = (
'delete from COUNTRIES'
'where'
' ID = :OLD_ID')
InsertSQL.Strings = (
'insert into COUNTRIES'
' (ID, KOD, NAME, VALID, COMMENTS)'
'values'
' (:ID, :KOD, :NAME, :VALID, :COMMENTS)')
RefreshSQL.Strings = (
'Select '
' ID,'
' KOD,'
' NAME,'
' VALID,'
' COMMENTS'
'from COUNTRIES '
'where'
' ID = :ID')
SelectSQL.Strings = (
'select C.ID, C.KOD, C.NAME, C.VALID, C.COMMENTS'
'from COUNTRIES C'
'order by 3 asc')
ModifySQL.Strings = (
'update COUNTRIES'
'set'
' KOD = :KOD,'
' NAME = :NAME,'
' VALID = :VALID,'
' COMMENTS = :COMMENTS'
'where'
' ID = :OLD_ID')
Left = 10
Top = 64
object ibdsMainCountriesNAME: TIBStringField
DisplayLabel = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
DisplayWidth = 37
FieldName = 'NAME'
Required = True
Size = 50
end
object ibdsMainCountriesKOD: TIBStringField
DisplayLabel = #1050#1086#1076'~'#1089#1090#1088#1072#1085#1099
DisplayWidth = 10
FieldName = 'KOD'
Size = 10
end
object ibdsMainCountriesVALID: TIntegerField
DisplayLabel = #1044#1077#1081#1089#1090#1074#1080'~'#1090#1077#1083#1100#1085#1099#1081
DisplayWidth = 9
FieldName = 'VALID'
Required = True
end
object ibdsMainCountriesCOMMENTS: TIBStringField
DisplayLabel = #1050#1086#1084#1084#1077#1085#1090#1072#1088#1080#1080
DisplayWidth = 21
FieldName = 'COMMENTS'
Size = 100
end
object ibdsMainCountriesID: TLargeintField
DisplayWidth = 15
FieldName = 'ID'
Required = True
Visible = False
end
end
object dsMainCountries: TDataSource
DataSet = ibdsMainCountries
OnStateChange = dsMainCountriesStateChange
Left = 10
Top = 94
end
end