TFlexValue missing IInterface implicit operate

[VojkoCendak]

Hi,
Can you please add missing feature?
problem when .SetParameter('MyInterfacedObjectName', myintfInstance) !
Thank you

{ TFlexValue }

{$IFNDEF FPC}
fDataIntf : IInterface;

class operator Implicit(Value : Pointer) : TFlexValue;
class operator Implicit(Value : Variant) : TFlexValue;
class operator Implicit(Value : TVarRec) : TFlexValue;
class operator Implicit(Value: IInterface): TFlexValue; // MISSING
class operator Equal(a : TFlexValue; b : string) : Boolean;
class operator Equal(a : TFlexValue; b : Integer) : Boolean;
class operator Equal(a : TFlexValue; b : Int64) : Boolean;

@@ -1301,4 +1302,9 @@ begin
Value := aValue;
end;

class operator TFlexValue.Implicit(Value: IInterface) : TFlexValue;
begin
result.AsInterface := Value;
end;

end.