E2182 '%s' Anweisung im OLE Automatisierungsbereich nicht erlaubt (Delphi)

Nach oben zu Fehler- und Warnungsmeldungen (Delphi)

index, stored, default und nodefault sind in OLE-Automatisierungsabschnitten nicht zulässig.

program Produce;

  type
     Base = class
       v : integer;
       procedure setV(x : integer);
       function getV : integer;
       automated
       property Value : integer read getV write setV nodefault;
     end;

  procedure Base.setV(x : integer);
  begin v := x;
  end;

  function Base.getV : integer;
  begin getV := v;
  end;

begin
end.

Die Verwendung einer nodefault-Klausel mit einer automatisierten Eigenschaft ist nicht zulässig.

program Solve;

  type
     Base = class
       v : integer;
       procedure setV(x : integer);
       function getV : integer;
       automated
       property Value : integer read getV write setV;
     end;

  procedure Base.setV(x : integer);
  begin v := x;
  end;

  function Base.getV : integer;
  begin getV := v;
  end;

begin
end.

Der Fehler kann behoben werden, indem die betreffende Anweisung entfernt wird. Eine andere Möglichkeit liegt darin, die Eigenschaft aus dem Automatisierungsabschnitt herauszunehmen.