ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/runtime/IBXConst.pas
Revision: 39
Committed: Tue May 17 08:14:52 2016 UTC (7 years, 11 months ago) by tony
Content type: text/x-pascal
File size: 10745 byte(s)
Log Message:
Committing updates for Release R1-4-1

File Contents

# Content
1 {************************************************************************}
2 { }
3 { Borland Delphi Visual Component Library }
4 { InterBase Express core components }
5 { }
6 { Copyright (c) 1998-2000 Inprise Corporation }
7 { }
8 { InterBase Express is based in part on the product }
9 { Free IB Components, written by Gregory H. Deatz for }
10 { Hoagland, Longo, Moran, Dunst & Doukas Company. }
11 { Free IB Components is used under license. }
12 { }
13 { The contents of this file are subject to the InterBase }
14 { Public License Version 1.0 (the "License"); you may not }
15 { use this file except in compliance with the License. You }
16 { may obtain a copy of the License at http://www.Inprise.com/IPL.html }
17 { Software distributed under the License is distributed on }
18 { an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either }
19 { express or implied. See the License for the specific language }
20 { governing rights and limitations under the License. }
21 { The Original Code was created by InterBase Software Corporation }
22 { and its successors. }
23 { Portions created by Inprise Corporation are Copyright (C) Inprise }
24 { Corporation. All Rights Reserved. }
25 { Contributor(s): Jeff Overcash }
26 { }
27 { IBX For Lazarus (Firebird Express) }
28 { Contributor: Tony Whyman, MWA Software http://www.mwasoftware.co.uk }
29 { Portions created by MWA Software are copyright McCallum Whyman }
30 { Associates Ltd 2011 }
31 { }
32 {************************************************************************}
33
34 unit IBXConst;
35
36 {$IF FPC_FULLVERSION >= 20700 }
37 {$codepage UTF8}
38 {$ENDIF}
39
40
41 interface
42
43 uses IBUtils;
44
45 resourcestring
46 { generic strings used in code }
47 SIBDatabaseEditor = 'Da&tabase Editor...';
48 SIBTransactionEditor = '&Transaction Editor...';
49 SDatabaseFilter = 'Database Files (*.fdb; *.gdb)|*.gdb; *.fdb|All files (*.*)|*.*';
50 SDisconnectDatabase = 'Database is currently connected. Disconnect and continue?';
51 SCommitTransaction = 'Transaction is currently Active. Rollback and continue?';
52 SExecute = 'E&xecute';
53 SNoDataSet = 'No dataset association';
54 SSQLGenSelect = 'Must select at least one key field and one update field';
55 SSQLNotGenerated = 'Update SQL statements not generated, exit anyway?';
56 SIBUpdateSQLEditor = '&UpdateSQL Editor...';
57 SIBDataSetEditor = '&Dataset Editor...';
58 SSQLDataSetOpen = 'Unable to determine field names for %s';
59 SDefaultTransaction = '%s, Default';
60
61 { strings used in error messages}
62 SUnknownError = 'Unknown error';
63 SInterBaseMissing = 'Firebird library not found in the path. Please install Firebird to use this functionality';
64 SInterBaseInstallMissing = 'InterBase Install DLL ibinstall.dll not found in the path. Please install InterBase 6 to use this functionality';
65 SIB60feature = '%s is an InterBase 6 function. Please upgrade to InterBase 6 to use this functonality';
66 SNotSupported = 'Unsupported feature';
67 SNotPermitted = 'Not permitted';
68 SFileAccessError = 'Temporary file access error';
69 SConnectionTimeout = 'Database connection timed out';
70 SCannotSetDatabase = 'Cannot set database';
71 SCannotSetTransaction = 'Cannot set transaction';
72 SOperationCancelled = 'Operation cancelled at user''s request';
73 SDPBConstantNotSupported = 'DPB Constant (isc_dpb_%s) is unsupported';
74 SDPBConstantUnknown = 'DPB Constant (%d) is unknown';
75 STPBConstantNotSupported = 'TPB Constant (isc_tpb_%s) is unsupported';
76 STPBConstantUnknown = 'TPB Constant (%d) is unknown';
77 SDatabaseClosed = 'Cannot perform operation -- DB is not open';
78 SDatabaseOpen = 'Cannot perform operation -- DB is currently open';
79 SDatabaseNameMissing = 'Database name is missing';
80 SNotInTransaction = 'Transaction is not active';
81 SInTransaction = 'Transaction is active';
82 STimeoutNegative = 'Timeout values cannot be negative';
83 SNoDatabasesInTransaction = 'No databases are listed in transaction component';
84 SUpdateWrongDB = 'Updating wrong database';
85 SUpdateWrongTR = 'Updating wrong transaction. Unique transaction expected in set';
86 SDatabaseNotAssigned = 'Database not assigned';
87 STransactionNotAssigned = 'Transaction not assigned';
88 SXSQLDAIndexOutOfRange = 'XSQLDA index out of range';
89 SXSQLDANameDoesNotExist = 'XSQLDA name does not exist (%s)';
90 SEOF = 'End of file';
91 SBOF = 'Beginning of file';
92 SInvalidStatementHandle = 'Invalid statement handle';
93 SSQLOpen = 'IBSQL Open';
94 SSQLClosed = 'IBSQL Closed';
95 SDatasetOpen = 'Dataset open';
96 SDatasetClosed = 'Dataset closed';
97 SUnknownSQLDataType = 'Unknown SQL Data type (%d)';
98 SInvalidColumnIndex = 'Invalid column index (index exceeds permitted range)';
99 SInvalidParamColumnIndex = 'Invalid parameter index (index exceeds permitted range)';
100 SInvalidDataConversion = 'Invalid data conversion';
101 SColumnIsNotNullable = 'Column cannot be set to null (%s)';
102 SBlobCannotBeRead = 'Blob stream cannot be read';
103 SBlobCannotBeWritten = 'Blob stream cannot be written';
104 SEmptyQuery = 'Empty query';
105 SCannotOpenNonSQLSelect = 'Cannot "open" a non-select statement. Use ExecQuery';
106 SNoFieldAccess = 'No access to field "%s"';
107 SFieldReadOnly = 'Field "%s" is read-only';
108 SFieldNotFound = 'Field "%s" not found';
109 SNotEditing = 'Not in edit mode';
110 SCannotInsert = 'Cannot insert into dataset. (No insert query)';
111 SCannotPost = 'Cannot post. (No update/insert query)';
112 SCannotUpdate = 'Cannot update. (No update query)';
113 SCannotDelete = 'Cannot delete from dataset. (No delete query)';
114 SCannotRefresh = 'Cannot refresh row. (No refresh query)';
115 SBufferNotSet = 'Buffer not set';
116 SCircularReference = 'Circular references not permitted';
117 SSQLParseError = 'SQL Parse Error:' + CRLF + CRLF + '%s';
118 SUserAbort = 'User abort';
119 SDataSetUniDirectional = 'Data set is uni-directional';
120 {$IFDEF UNIX}
121 SCannotCreateSharedResource = 'Cannot create shared resource. %s';
122 {$ELSE}
123 SCannotCreateSharedResource = 'Cannot create shared resource. (Windows error %d)';
124 {$ENDIF}
125 SWindowsAPIError = 'Windows API error. (Windows error %d [$%.8x])';
126 SColumnListsDontMatch = 'Column lists do not match';
127 SColumnTypesDontMatch = 'Column types don''t match. (From index: %d; To index: %d)';
128 SCantEndSharedTransaction = 'Can''t end a shared transaction unless it is forced and equal ' +
129 'to the transaction''s TimeoutAction';
130 SFieldUnsupportedType = 'Unsupported Field Type';
131 SCircularDataLink = 'Circular DataLink Reference';
132 SEmptySQLStatement = 'Empty SQL Statement';
133 SIsASelectStatement = 'use Open for a Select Statement';
134 SRequiredParamNotSet = 'Required parameter "%s" value not set';
135 SNoStoredProcName = 'No Stored Procedure Name assigned';
136 SIsAExecuteProcedure = 'use ExecProc for Procedure; use TQuery for Select procedures';
137 SUpdateFailed = 'Update Failed';
138 SNotCachedUpdates = 'CachedUpdates not enabled';
139 SNotLiveRequest = 'Request is not live - cannot modify';
140 SNoProvider = 'No Provider';
141 SNoRecordsAffected = 'No Records Affected';
142 SNoTableName = 'No Table Name assigned';
143 SCannotCreatePrimaryIndex = 'Cannot Create Primary Index; are created automatically';
144 SCannotDropSystemIndex = 'Cannot Drop System Index';
145 STableNameMismatch = 'Table Name Mismatch';
146 SIndexFieldMissing = 'Index Field Missing';
147 SInvalidCancellation = 'Cannot Cancel events while processing';
148 SInvalidEvent = 'Invalid Event';
149 SMaximumEvents = 'Exceded Maximum Event limits';
150 SNoEventsRegistered = 'No Events Registered';
151 SInvalidQueueing = 'Invalid Queueing';
152 SInvalidRegistration = 'Invalid Registration';
153 SInvalidBatchMove = 'Invalid Batch Move';
154 SSQLDialectInvalid = 'SQL Dialect Invalid';
155 SSPBConstantNotSupported = 'SPB Constant Not supported';
156 SSPBConstantUnknown = 'SPB Constant Unknown';
157 SServiceActive = 'Cannot perform operation -- service is not attached';
158 SServiceInActive = 'Cannot perform operation -- service is attached';
159 SServerNameMissing = 'Server Name Missing';
160 SQueryParamsError = 'Query Parameters missing or incorrect';
161 SStartParamsError = 'start Parameters missing or incorrect';
162 SOutputParsingError = 'Unexpected Output buffer value';
163 SUseSpecificProcedures = 'Generic ServiceStart not applicable: Use Specific Procedures to set configuration params';
164 SSQLMonitorAlreadyPresent = 'SQL Monitor Instance is already present';
165 SCantPrintValue = 'Cannot print value';
166 SEOFReached = 'SEOFReached';
167 SEOFInComment = 'EOF in comment detected';
168 SEOFInString = 'EOF in string detected';
169 SParamNameExpected = 'Parameter name expected';
170 SSuccess = 'Successful execution';
171 SDelphiException = 'DelphiException %s';
172 SNoOptionsSet = 'No Install Options selected';
173 SNoDestinationDirectory = 'DestinationDirectory is not set';
174 SNosourceDirectory = 'SourceDirectory is not set';
175 SNoUninstallFile = 'Uninstall File Name is not set';
176 SOptionNeedsClient = '%s component requires Client to function properly';
177 SOptionNeedsServer = '%s component requires Server to function properly';
178 SInvalidOption = 'Invalid option specified';
179 SInvalidOnErrorResult = 'Unexpected onError return value';
180 SInvalidOnStatusResult = 'Unexpected onStatus return value';
181
182 SInterbaseExpressVersion = 'Firebird Express for Lazarus 1.4.1';
183 SEditSQL = 'Edit SQL';
184 SIBSQLEditor = 'IBSQL Editor';
185 SIBServiceEditor = 'Edit IB Service';
186 SDPBConstantUnknownEx = 'DPB Constant (%s) is unknown';
187 STPBConstantUnknownEx = 'TPB Constant (%s) is unknown';
188 SSV5APIError = 'SV5 API API Error - %s';
189 SThreadFailed = '%s Thread failed with Exception: %s';
190 sFieldSizeError = 'Field %s is too small to receive the data';
191 STransactionNotEnding = 'Transaction is not being completed';
192 SDscInfoTokenMissing = '%s token not found';
193 SNoLoginDialog = 'Default Login Dlalog not found. Have you included ibexpress ' +
194 'in your program uses list?';
195
196 implementation
197
198 end.
199