Her er grunden til, at det ikke virker:
I FireDAC.Stan.Option :
procedure TFDFormatOptions.ColumnDef2FieldDef()
...
dtWideHMemo:
// Here was ftOraClob, but then will be created TMemoField,
// which does not know anything about Unicode. So, I have
// changed to ftFmtMemo. But probably may be problems ...
ADestFieldType := ftWideMemo;
Faktisk kan sandsynligvis være problemer .
Løsningen er at tilføje en mapping-regel, der konverterer dtWideHMemo til dtMemo .
Derefter kan du læse og skrive til CLOB .AsString fungerer fint.
Rapporteret som RSP-19600 i Embarcadero Quality Portal.
For fuldstændighedens skyld:fordi kortlægningen nævnt i mit andet svar ikke længere er aktiv, skal du ændre adgangen til parametrene med .Value i stedet for .AsString.