Subject | Converting server to IBObjects |
---|---|
Author | redbonelogic |
Post date | 2012-05-10T02:49:43Z |
Hi All,
My first post here. Oh boy!
Anyhow, I am converting a middleware server to IBObjects.
All has gone well up to now. It compiles starts, and my client can connect. A few operations occur on the server after login but then it sends this error back to the client:
"Project RedboneServer.exe raised exception class EClassNotFound with message 'Class TIBOLargeIntField not found'. Process stopped. Use Step or Run to continue."
Here is the set up:
Delphi 7
ASTA middleware
Firebird 2.5
IBObjects
IBOQuery hooked up to an ASTA Provider
A clue for you. I get this error when I compile a sample server built with IBObjects:
ftLargeInt: TIBOQuery(Query).ParamByName(Name).AsInt64 := ParamList[i].AsLargeInt;
This code is in my server too. I changed it to this:
ftLargeInt: TIBOQuery(Query).ParamByName(Name).Value := ParamList[i].AsLargeInt;
And I changed it to this:
ftLargeInt: TIBOQuery(Query).ParamByName(Name).AsString := IntToStr(ParamList[i].AsLargeInt);
Both compile and start but I get the "Class TIBOLargeIntField not found" error.
Any ideas?
My first post here. Oh boy!
Anyhow, I am converting a middleware server to IBObjects.
All has gone well up to now. It compiles starts, and my client can connect. A few operations occur on the server after login but then it sends this error back to the client:
"Project RedboneServer.exe raised exception class EClassNotFound with message 'Class TIBOLargeIntField not found'. Process stopped. Use Step or Run to continue."
Here is the set up:
Delphi 7
ASTA middleware
Firebird 2.5
IBObjects
IBOQuery hooked up to an ASTA Provider
A clue for you. I get this error when I compile a sample server built with IBObjects:
ftLargeInt: TIBOQuery(Query).ParamByName(Name).AsInt64 := ParamList[i].AsLargeInt;
This code is in my server too. I changed it to this:
ftLargeInt: TIBOQuery(Query).ParamByName(Name).Value := ParamList[i].AsLargeInt;
And I changed it to this:
ftLargeInt: TIBOQuery(Query).ParamByName(Name).AsString := IntToStr(ParamList[i].AsLargeInt);
Both compile and start but I get the "Class TIBOLargeIntField not found" error.
Any ideas?