Delphi Tokyo Reading ftOraClob with MemoField

[fboudineau]

Hi,
A TOracleDataset is used to fetch a record with a Clob field. It's handled as a ftOraClob BlobTyp and TMemoField Delphi type.
As my Clob field contain a SQL script i'am using a command like OracleQuery.SQL.Assign(QdbMYCLOB_SQL_SCRIPT)
to fill a TOracleQuery component.
Under Delphi 7 all is running OK but under Tokyo I get only one caracter.
I'am running an Oracle 11g UTF8 database
Best regards,
Frederic

 

[Marco Kalter]

Is this problem specific to the SQL.Assign function, and do you see the correct data if you inspect the TMemoField data in another way?

 

[fboudineau]

When I inspect TMemoField under Tokyo (QdbSCRIPT_VARPLSQL.asWideString):
'b'#0'e'#0'g'#0'i'#0'n'#0#$D#0#$A#0#$D#0#$A#0's'#0'e'#0'l'#0'e'#0'c'#0't'#0

The same under Delphi 7:
'begin'#$D#$A#$D#$A'select

Identical conditions under Oracle UTF8.

Strangely I have no problem with DOA under delphi 7 and Oracle UTF8.
I must admit that I am not very comfortable under Tokyo after many years under Delphi 7 I finally decided to change for Tokyo. But always with DOA so reliable!