E2160 OLE オートメーション呼び出しとしては許されない型です (Delphi)

エラーと警告のメッセージ（Delphi） への移動

コンパイラがバリアント型へ変換できないデータ型は OLE オートメーションの呼び出しに使用できません。

program Produce;

  type
    Base = class
      x : Integer;
    end;

  var
    B : Base;
    V : Variant;

begin
  V.Dispatch(B);
end.

{ バリアント型へ変換できないクラスなので OLE 呼び出しに使用できない }

program Solve;


  type
    Base = class
      x : Integer;
    end;

  var
    B : Base;
    V : Variant;

begin
  V.Dispatch(B.i);
end.

{ これらのデータ型を手動でバリアントへ変換するか，バリアントへ自動的に変換できるデータ型だけを使用するのがこの問題のただ 1 つの解決方法である }