--- ibx/trunk/design/IBDBReg.pas	2012/08/05 18:28:19	7
+++ ibx/trunk/design/IBDBReg.pas	2012/11/22 22:53:40	13
@@ -324,7 +324,7 @@ uses IB, IBQuery, IBStoredProc, IBCustom
      IBBatchMove, DBLoginDlg, IBExtract,LResources, IBSelectSQLEditor,
      IBModifySQLEditor,IBDeleteSQLEditor,IBRefreshSQLEditor,
      IBInsertSQLEditor, IBGeneratorEditor, IBUpdateSQLEditor, IBDataSetEditor,
-     IBSQLEditor, ibserviceeditor;
+     IBSQLEditor, ibserviceeditor, LCLVersion;
 
 
 
@@ -333,7 +333,10 @@ begin
   if not TryIBLoad then Exit;
 
   RegisterNoIcon([TIBStringField, TIBBCDField]);
+  {$if lcl_fullversion < 01010000}
+  {see http://bugs.freepascal.org/view.php?id=19035 }
   RegisterNoIcon([TIntegerField]);
+  {$endif}
   RegisterComponents(IBPalette1, [ TIBQuery, TIBDataSet,
    TIBDatabase, TIBTransaction, TIBUpdateSQL, TIBEvents,
      TIBSQL, TIBDatabaseInfo, TIBSQLMonitor,