fibconsts.pas

FIBPlus is a component suite intended for work with InterBase. It is direct, fast and flexible Inter

{***************************************************************}
{ FIBPlus - component library for direct access to Firebird and }
{ InterBase databases                                           }
{                                                               }
{    FIBPlus is based in part on the product                    }
{    Free IB Components, written by Gregory H. Deatz for        }
{    Hoagland, Longo, Moran, Dunst & Doukas Company.            }
{    mailto:[e-mail]                                    }
{                                                               }
{    Copyright (c) 1998-2007 Devrace Ltd.                       }
{    Written by Serge Buzadzhy ([e-mail])               }
{                                                               }
{ ------------------------------------------------------------- }
{    FIBPlus home page: http://www.fibplus.com/                 }
{    FIBPlus support  : http://www.devrace.com/support/         }
{ ------------------------------------------------------------- }
{                                                               }
{  Please see the file License.txt for full license information }
{***************************************************************}

unit FIBConsts;

interface

ResourceString
  SCantFindApiProc     ='Can''t find procedure %s in %s';
  SCantLoadLibrary     ='Can''t load library %s ';
  SUnknownClientLibrary='Can''t perform operation %s. Unknown client library';
  STransactionForOtherLibrary='%s.'#13#10'Transaction can''t work with different client library.';

  SEdErrorPrefix = 'Error of record updating:';
  SEdDeadLockMess = 'Deadlock detected';
  SEdNotExistRecord = 'Record does not exist';
  SEdMultiplyRecord = 'Attempt to edit multiple records';
  SEdUnknownError = 'Unknown error';
  SCantSort = 'Can''t sort. Invalid parameter: Fields[';
  SCantGetInfo = 'Can''t get info for ';
  SDataBaseNotAssigned = 'Database is not assigned';

  SOKButton = '&OK';
  SCancelButton = '&Cancel';
  SGenSQLReplaceSelect='&Replace Select SQL ';
  SEdDataSetInfoCaption = 'Choose DataSet repository information';
  SEdDataSetInfoFields = 'Other fields';
  SEdDataSetInfoKeyField = 'Key field';
  SEdDataSetInfoGenerator = 'Generator';
  SEdDataSetInfoFilter = 'Filter';

  SDBEditCaption = 'Connection Properties';
  SDBEditServerGroup = ' Server ';
  SDBEditServer = '&Server';
  SDBEditNetProtocol = '&Network protocol';
  SDBEditDatabase = '&Database';
  SDBEditAlias = '&Alias name';
  SDBEditLocal = '&Local engine';
  SDBEditRemote = '&Remote server';
  SDBEditBrowse = '&Browse';
  SDBEditConnectParams = 'Connection Parameters';
  SDBEditUserName = '&User name';
  SDBEditPassword = '&Password';
  SDBEditSQLRole = 'Rol&e';
  SDBEditConnectCharSet = 'C&harSet';
  SDBEditSQLDialect = 'S&QL Dialect';
  SDBEditLoginPromt = 'Use lo&gin prompt';
  SDBEditTestButton = '&Test';
  SDBEditGDBFilter =
   'IB/FB Database Files (*.gdb;*.ib;*.fdb)|*.gdb;*.ib;*.fdb|'+
   'Interbase Database Files (*.gdb)|*.gdb|'+
   'Firebird Database Files (*.fdb)|*.fdb|'+
   'Interbase7 Database Files (*.ib)|*.ib|All files (*.*)|*.*';
  SDBEditSuccessConnection = 'Connection is successful';

  SGenSQLCaption = 'FIBPlus SQL Generator';
  SGenSQLOptions = 'Options';
  SGenSQLGetFieldsButton = 'Get &table fields';
  SGenSQLGenerateButton = '&Generate SQLs';
  SGenSQLClearButton = '&Clear SQLs';
  SGenSQLOnSaveGroup = 'On save SQLs';
  SGenSQLCheckSQLHint = 'Check SQLs before saving properties';
  SGenSQLCheckSQL = 'Check SQLs';
  SGenSQLFieldOriginHint = 'Save fields origin';
  SGenSQLFieldOrigin = 'Field origins';
  SGenSQLGeneratorOptions = 'Options of SQLs generation';
  SGenSQLPrimaryHint = 'Use only primary key in where clause';
  SGenSQLPrimary = 'Where by primary key';
  SGenSQLNonUpdatePrimaryHint = 'Not to change primary key in UpdateSQL';
  SGenSQLNonUpdatePrimary = 'Not to update primary key';
  SGenSQLDefaultSymbol = 'Use '#39'?'#39' for parameters';
  SGenSQLCheckButton = 'C&heck SQLs';
  SGenSQLKeyFields = 'Key fields';
  SGenSQLUpdateFields = 'Update fields';
  SGenSQL_SQLsTabs = 'SQLs';
  SGenSQLStatement = 'Statement &type';
  SGenSQLMakeSQLTab = 'Make SQL';
  SGenSQLFilterBy = 'Filter by';
  SGenSQLAlias = 'Table alias';
  SGenSQLTablesColumn = 'Tables';
  SGenSQLView1 = 'No Objects';
  SGenSQLView2 = 'Tables/Views';
  SGenSQLView3 = 'Stored Procedures';
  SGenSQLTargetMemo = 'Target memo';
  SGenSQLOutput1 = 'Add to buffer memo';
  SGenSQLOutput2 = 'Replace SelectSQL ';
  SGenSQLOutput3 = 'Add as JOIN to SelectSQL';
  SGenSQLSaveAllButton = 'Save &all';
  SGenSQLReplaceButton = 'Re&place "*"';
  SGenSQLCheckErrorButton = 'Check &error';
  SGenSQLSaveSQLButtonHint = 'Save current SQL';
  SReplaceSQL          = '&Replace Select SQL text';
  SGenSQLSaveSQLButton = '&Save SQL';
  SGenSQLErrorPreffix = 'Error in %s';
  SGenSQLEmpty = 'SQL is empty';
  SGenSQLCorrectSQL = 'SQL is correct';
  SGenSQLFromNotFound = 'Clause "FROM" is not found';

  SLoginDlgLoginCaption = 'Database login';
  SLoginDlgDatabase = 'Database:';

  SFieldInfoCaption = 'Developers Data Repositary';
  SFieldInfoCopyFieldsHint = 'Copy fields from current meta-object';
  SFieldInfoCopyFields = '&Copy fields';
  SFieldInfoFilter = '&Filter by current meta-object';
  SFieldInfoKindTables = 'Tables/Views';
  SFieldInfoProcedures = 'Stored Procedures';
  SFieldInfoFilterHint = 'Filter text';
  SFieldInfoGridHint = 'List of tables or stored procedures';

  SFieldInfoTablesItem = 'Tables';
  SFieldInfoProcedureItem = 'Procedures';
  SFieldInfoUserFormsItem = 'User forms';

  STransEditCaption = 'Transaction Editor';
  STransEditKind = 'Kind of transaction';
  STransEditSettings = '&Settings:';
  STransEditNewKind = '&New kind';
  STransEditSaveKindButton = '&Save kind';
  STransEditExportButton = '&Export to INI';
  STransEditImportButton = '&Import from INI';
  STransEditOpenFilter = 'Transaction kinds *.trk|*.trk|*.ini |*.ini';
  STransEditSaveFilter = 'Transaction kinds *.trk|*.trk';
  STransEditExportTitle = 'Export transaction settings to file';
  STransEditNewKindDialog = 'Input new kind of transaction';
  STransEditNewKindName = 'Name of kind';

  SCompEditInfoTableNotExist  = 'Table FIB$DATASETS_INFO does not exist. Would you like to create it?';
  SCompEditEditTransaction    = 'Edit transaction parameters';
  SCompEditInfoFieldsNotExist = 'Table FIB$FIELDS_INFO does not exist. Would you like to create it?';
  SCompEditInfoFieldsForbid   = 'Can''t use FIB$FIELDS_INFO.'#13#10+
   'urFieldsInfo not included into Database.UseRepositories.';

  SCompEditEditFieldInfo = 'Edit field information table';
  SCompEditErrorMessages = 'Edit error messages table';
  SCompEditErrorTableNotExist = 'Table FIB$ERROR_MESSAGES does not exist. Would you like to create it?';
  SCompEditErrorTableForbid  = 'Can''t use  FIB$ERROR_MESSAGES.'#13#10+
  'urErrorMessagesInfo not included into Database.UseRepositories.';

  SCompEditDBEditor = 'Database Editor';
  SCompEditSQLGenerator = 'SQL Generator';
  SCompSaveToDataSetInfo = 'Save to dataSets repository table';
  SCompChooseDataSetInfo = 'Choose from dataSets repository table';
  SCompEditDataSetInfo = 'Edit dataSets repository table';
  SCompEditDataSet_ID = '.DataSet_ID should be greater than 0';
  SCompEditSQLText          = '(SQL Text)';
  SCompEditStatTableExist   = 'Statistic table already exists.';
  SCompEditStatTableCreated = 'Statistic table has been created successfully.';
  SCompEditCreateStatTable  = 'Create statistic table';
  SCompEditDataSetInfoNotExists = 'Table FIB$DATASETS_INFO does not exist.';
  SCompEditDataSetInfoForbid    = 'Can''t use FIB$DATASETS_INFO.'#13#10+
   'urDataSetInfo not included into Database.UseRepositories.';
  SCompEditUnableInsertInfoRecord = 'Error of inserting new information record';
  SCompEditSaveDataSetProperty = 'Save FIBDataSet properties';
  SCompEditDataSetDesc = 'Set dataset description';
  SCompEditFieldInfoLoadError = 'Error of loading FieldInfo from stream';