2 |
|
Left = 457 |
3 |
|
Height = 453 |
4 |
|
Top = 397 |
5 |
< |
Width = 817 |
5 |
> |
Width = 943 |
6 |
|
Caption = 'IB Tables Example' |
7 |
|
ClientHeight = 453 |
8 |
< |
ClientWidth = 817 |
8 |
> |
ClientWidth = 943 |
9 |
|
DefaultMonitor = dmPrimary |
10 |
|
OnShow = FormShow |
11 |
|
Position = poScreenCenter |
12 |
< |
LCLVersion = '1.8.0.4' |
12 |
> |
LCLVersion = '2.0.0.2' |
13 |
|
object Panel1: TPanel |
14 |
|
Left = 0 |
15 |
|
Height = 453 |
16 |
|
Top = 0 |
17 |
< |
Width = 817 |
17 |
> |
Width = 943 |
18 |
|
Align = alClient |
19 |
|
ClientHeight = 453 |
20 |
< |
ClientWidth = 817 |
20 |
> |
ClientWidth = 943 |
21 |
|
TabOrder = 0 |
22 |
|
object Panel2: TPanel |
23 |
|
Left = 1 |
67 |
|
Left = 176 |
68 |
|
Height = 451 |
69 |
|
Top = 1 |
70 |
< |
Width = 640 |
70 |
> |
Width = 766 |
71 |
|
Align = alClient |
72 |
|
Color = clWindow |
73 |
|
Columns = < |
94 |
|
DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending] |
95 |
|
end |
96 |
|
item |
97 |
+ |
ReadOnly = True |
98 |
+ |
Title.Alignment = taCenter |
99 |
+ |
Title.Caption = 'Full Name' |
100 |
+ |
Width = 120 |
101 |
+ |
FieldName = 'FULL_NAME' |
102 |
+ |
AutoSizeColumn = True |
103 |
+ |
InitialSortColumn = False |
104 |
+ |
DBLookupProperties.ItemHeight = 0 |
105 |
+ |
DBLookupProperties.ItemWidth = 0 |
106 |
+ |
DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending] |
107 |
+ |
end |
108 |
+ |
item |
109 |
|
Title.Alignment = taCenter |
110 |
|
Title.Caption = 'Emp No.' |
111 |
|
Width = 80 |
172 |
|
'rec_version' |
173 |
|
'nowait' |
174 |
|
) |
175 |
< |
left = 232 |
175 |
> |
left = 272 |
176 |
|
top = 24 |
177 |
|
end |
178 |
|
object Depts: TIBTable |
185 |
|
BufferChunks = 1000 |
186 |
|
CachedUpdates = False |
187 |
|
DataSetCloseAction = dcSaveChanges |
188 |
+ |
EnableStatistics = False |
189 |
+ |
GeneratorField.ApplyOnEvent = gaeOnNewRecord |
190 |
|
IndexFieldNames = 'DEPT_NO' |
191 |
+ |
MasterDetailDelay = 500 |
192 |
|
ReadOnly = True |
193 |
|
TableName = 'DEPARTMENT' |
194 |
< |
left = 314 |
194 |
> |
left = 424 |
195 |
|
top = 24 |
196 |
|
object DeptsDEPT_NO: TIBStringField |
197 |
|
DisplayWidth = 3 |
275 |
|
end |
276 |
|
object DataSource2: TDataSource |
277 |
|
DataSet = Depts |
278 |
< |
left = 272 |
278 |
> |
left = 360 |
279 |
|
top = 24 |
280 |
|
end |
281 |
|
object Datasource1: TDataSource |
282 |
|
DataSet = Employees |
283 |
< |
left = 368 |
283 |
> |
left = 496 |
284 |
|
top = 24 |
285 |
|
end |
286 |
|
object Employees: TIBTable |
291 |
|
BufferChunks = 1000 |
292 |
|
CachedUpdates = False |
293 |
|
DataSetCloseAction = dcSaveChanges |
294 |
+ |
EnableStatistics = False |
295 |
+ |
GeneratorField.Generator = 'EMP_NO_GEN ' |
296 |
+ |
GeneratorField.Field = 'EMP_NO' |
297 |
+ |
GeneratorField.ApplyOnEvent = gaeOnNewRecord |
298 |
|
IndexFieldNames = 'DEPT_NO' |
299 |
|
MasterFields = 'DEPT_NO' |
300 |
|
MasterSource = DataSource2 |
301 |
+ |
MasterDetailDelay = 300 |
302 |
|
TableName = 'EMPLOYEE' |
303 |
< |
left = 416 |
303 |
> |
left = 576 |
304 |
|
top = 24 |
305 |
|
object EmployeesEMP_NO: TSmallintField |
306 |
|
DisplayWidth = 10 |