Delphi 10.4 Could not call proc property type Variant

[bamsey2k1]

property like:
RegisterProperty('Rec', 'Variant string', TPSPropType.iptRW);

compiled in XE7 working fine but compiled in 10.4 gives "Could not call proc"

[pjrobin]

Perhaps related to #232 ?

[bamsey2k1]

Yeah, probably the same issue

[pjrobin]

found a fix: in invokeCall.inc function TPSExec.InnerfuseCall, result type variant is not implemented. adding the following code after line 188 fixed the issue:

      btVariant:
      begin
        PVariant(res.dta)^ := Invoke(Address,Args,SysCalConv,TypeInfo(Variant),False,IsConstr).AsVariant;
      end;

[bamsey2k1]

Great news, it works! But you have add following code after line 67:

btVariant: Arg := TValue.From(PVariant(fvar.dta)^);