168 |
|
ibxeODSVersionRequired, |
169 |
|
ibxErrorParsing, |
170 |
|
ibxeParameterNameNotFound, |
171 |
< |
ibxeListFieldNotFound |
171 |
> |
ibxeListFieldNotFound, |
172 |
> |
ibxeDBBufferTooSmall |
173 |
|
); |
174 |
|
|
175 |
|
function GetErrorMessage(ErrMess: TIBClientError): AnsiString; |
277 |
|
STPBConstantUnknownEx = 'TPB Constant (%s) is unknown'; |
278 |
|
SSV5APIError = 'SV5 API API Error - %s'; |
279 |
|
SThreadFailed = '%s Thread failed with Exception: %s'; |
280 |
< |
SFieldSizeError = 'Field %s is too small to receive the data'; |
280 |
> |
SFieldSizeError = 'Field %s is too small (%d bytes) to receive the data (%d bytes)'; |
281 |
|
SNoLoginDialog = 'Default Login Dlalog not found. Have you included ibexpress ' + |
282 |
|
'in your program uses list?'; |
283 |
|
SInfoBufferIndexError = 'Info Buffer Index Out of Range (%d)'; |
303 |
|
SErrorParsing = 'Error parsing SQL Statement at clause starting with %s'; |
304 |
|
SParameterNameNotFound = 'Parameter Name (%s) not found'; |
305 |
|
SListFieldNotFound = 'ListField Name is not a valid dataset column name (%s)'; |
306 |
+ |
SDBBufferTooSmall = 'Dataset buffer is too small (%d bytes) to receive the data from Field %s (%d bytes)'; |
307 |
|
|
308 |
|
const |
309 |
|
IBErrorMessages: array[TIBClientError] of string = ( |
399 |
|
SODSVersionRequired, |
400 |
|
SErrorParsing, |
401 |
|
SParameterNameNotFound, |
402 |
< |
SListFieldNotFound |
402 |
> |
SListFieldNotFound, |
403 |
> |
SDBBufferTooSmall |
404 |
|
); |
405 |
|
|
406 |
|
function GetErrorMessage(ErrMess: TIBClientError): AnsiString; |