Problem getting CLOB with TOracleObject on UTF8 database

[Nathanael Schmied]

Hello,

i'm working with Delphi 2009

On an AL32UTF8 charset database, I got a problem with TOracleObject while trying to get the content of a CLOB field.
The data received have nothing to do with the content of the Clob.

After some researches I found the bug in your code, it's in the Oracle.pas unit

at Line 17121

you must replace

Result := LOB.GetString(l);

with

if LOB.IsUTF16 then
Result := LOB.GetWideString(l)
else
Result := LOB.GetString(l);

Thank's to confirm me that's the right way.
Have a nice day
Nathanael

 

[Marco Kalter]

Thanks for reporting this, we'll check it out.