| 425 |
|
IBInsertSQLEditor, IBGeneratorEditor, IBUpdateSQLEditor, IBDataSetEditor, |
| 426 |
|
IBSQLEditor, ibserviceeditor, LCLVersion, IBDynamicGrid, IBLookupComboEditBox, |
| 427 |
|
IBTreeView, DBControlGrid, ibxscript, IBLocalDBSupport, IBDSDialogs, |
| 428 |
< |
IBArrayGrid, IBVersion, IBDataOutput, IBXServiceEditor; |
| 428 |
> |
IBArrayGrid, IBVersion, IBDataOutput, IBXServiceEditor, IBJournal; |
| 429 |
|
|
| 430 |
|
const |
| 431 |
|
IBPalette1 = 'Firebird'; {do not localize} |
| 465 |
|
RegisterNoIcon([TIBStringField, TIBBCDField, TIBMemoField, TIBArrayField, |
| 466 |
|
TIBSmallintField, TIBIntegerField, TIBLargeIntField, TIBDateTimeField, |
| 467 |
|
TIBTimeField]); |
| 468 |
< |
{$if lcl_fullversion < 01010000} |
| 468 |
> |
{$if not declared(TIntegerField)} |
| 469 |
|
{see http://bugs.freepascal.org/view.php?id=19035 } |
| 470 |
|
RegisterNoIcon([TIntegerField]); |
| 471 |
|
{$endif} |
| 472 |
|
RegisterComponents(IBPalette1, [ TIBQuery, TIBDataSet, |
| 473 |
|
TIBDatabase, TIBTransaction, TIBUpdateSQL, TIBUpdate, TIBEvents, |
| 474 |
|
TIBSQL, TIBDatabaseInfo, TIBSQLMonitor, |
| 475 |
< |
TIBStoredProc,TIBBatchMove, TIBTable,TIBExtract, TIBXScript, TIBLocalDBSupport, |
| 475 |
> |
TIBStoredProc,TIBBatchMove, TIBTable,TIBExtract, TIBXScript, TIBJournal, TIBLocalDBSupport, |
| 476 |
|
TIBBlockFormatOut,TIBCSVDataOut,TIBInsertStmtsOut]); |
| 477 |
|
if FirebirdAPI.HasServiceAPI then |
| 478 |
|
begin |
