8 |
|
ClientWidth = 722 |
9 |
|
OnClose = FormClose |
10 |
|
OnShow = FormShow |
11 |
< |
LCLVersion = '1.4.0.2' |
11 |
> |
LCLVersion = '1.4.0.3' |
12 |
|
object Panel1: TPanel |
13 |
|
Left = 11 |
14 |
|
Height = 367 |
277 |
|
object IBDatabase1: TIBDatabase |
278 |
|
Connected = False |
279 |
|
AllowStreamedConnected = False |
280 |
< |
DatabaseName = 'employee' |
280 |
> |
DatabaseName = 'localhost:employee' |
281 |
|
Params.Strings = ( |
282 |
|
'lc_ctype=UTF-8' |
283 |
|
'user_name=SYSDBA' |
291 |
|
end |
292 |
|
object IBTransaction1: TIBTransaction |
293 |
|
Active = False |
294 |
+ |
Params.Strings = ( |
295 |
+ |
'read_committed' |
296 |
+ |
'rec_version' |
297 |
+ |
'nowait' |
298 |
+ |
) |
299 |
|
left = 24 |
300 |
|
top = 136 |
301 |
|
end |
305 |
|
AfterDelete = DepartmentsAfterDelete |
306 |
|
AfterEdit = DepartmentsAfterDelete |
307 |
|
AfterInsert = DepartmentsAfterInsert |
303 |
– |
BeforeClose = DepartmentsBeforeScroll |
304 |
– |
BeforeScroll = DepartmentsBeforeScroll |
308 |
|
BufferChunks = 1000 |
309 |
|
CachedUpdates = False |
310 |
|
DeleteSQL.Strings = ( |
340 |
|
GeneratorField.Field = 'DEPT_NO' |
341 |
|
GeneratorField.ApplyOnEvent = gaeOnNewRecord |
342 |
|
GenerateParamNames = False |
343 |
+ |
DataSetCloseAction = dcSaveChanges |
344 |
|
AfterTransactionEnd = DepartmentsAfterTransactionEnd |
345 |
|
left = 64 |
346 |
|
top = 176 |
458 |
|
'order by 2' |
459 |
|
) |
460 |
|
Params = <> |
461 |
+ |
DataSetCloseAction = dcDiscardChanges |
462 |
|
left = 64 |
463 |
|
top = 221 |
464 |
|
end |
485 |
|
Name = 'DEPT_NO' |
486 |
|
ParamType = ptInput |
487 |
|
end> |
488 |
+ |
DataSetCloseAction = dcDiscardChanges |
489 |
|
left = 64 |
490 |
|
top = 264 |
491 |
|
ParamData = < |