mORMot Open Source

Vitaly

Member

From: UAE

Registered: 2017-01-31

Posts: 168

Website

TDocVariant Add(integer) seems stopped working for Delphi

After recent commit TDocVariant.DoFunction doesn't get to 'Add' Name if the argument is integer. It gets into

if VariantToInteger(variant(Arguments[0]),ndx) then

and then just leaves further else...if... combination. Therefore:

... raised exception class EVariantDispatchError with message 'Variant method calls not supported'.

Maybe it is better to move this if to the end of it?

[Delphi 10.4, Win64]

ab

Administrator

From: France

Registered: 2010-06-21

Posts: 14,655

Website

Re: TDocVariant Add(integer) seems stopped working for Delphi

You are right.

It should be fixed by https://synopse.info/fossil/info/acc12807e6

Sorry for the regression.

Vitaly

Member

From: UAE

Registered: 2017-01-31

Posts: 168

Website

Re: TDocVariant Add(integer) seems stopped working for Delphi

Yes, it's working again, thanks for a quick fix!