418 |
|
implementation |
419 |
|
|
420 |
|
uses IB, IBQuery, IBStoredProc, IBCustomDataSet, IBMessages, |
421 |
< |
IBSQL, IBSQLMonitor, IBDatabaseInfo, IBEvents, IBTypes, |
421 |
> |
IBSQL, IBSQLMonitor, IBDatabaseInfo, IBEvents, IBInternals, |
422 |
|
IBServices, IBXServices, IBDatabaseEdit, IBTransactionEdit, |
423 |
|
IBBatchMove, IBExtract,LResources, IBSelectSQLEditor, |
424 |
|
IBModifySQLEditor,IBDeleteSQLEditor,IBRefreshSQLEditor, |
455 |
|
end; |
456 |
|
|
457 |
|
RegisterNoIcon([TIBStringField, TIBBCDField, TIBMemoField, TIBArrayField, |
458 |
< |
TIBSmallintField, TIBIntegerField, TIBLargeIntField]); |
458 |
> |
TIBSmallintField, TIBIntegerField, TIBLargeIntField, TIBDateTimeField, |
459 |
> |
TIBTimeField]); |
460 |
|
{$if lcl_fullversion < 01010000} |
461 |
|
{see http://bugs.freepascal.org/view.php?id=19035 } |
462 |
|
RegisterNoIcon([TIntegerField]); |