migration to 4.0.7.1: Invalid variant convertion

[pult]

I spend migration from version 3.4.6.4 on version 4.0.7.1.
The mistake arises in a file "OracleData.pas" in a method:
-------------------------------------------
function TOracleDataSet.CompareFieldToVariant(
...
if vd AValue then Exit;
// ^^^^^^^^^^^^^^^^^^^^ - : Invalid variant convertion ...
end;
end;
Result := True;
end;
-------------------------------------------
I have replaced "if vd AValue then Exit;" on:
"if VarToStr(vd) VarToStr(AValue) then Exit;"

 

[Marco Kalter]

We haven't received any reports about this before. Can you send me a demo project to reproduce this?

 

[pult]

The byg was found in successor TOracleDataset and is connected with change of algorithm CompareFieldToVariant. In old version DOA it was always used "TField.OldValue" ... The Problem is solved ...