E2062 コンストラクタは virtual にはできません (Delphi)

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

クラス型と異なり，オブジェクト型は静的コンストラクタだけを持てます。

program Produce;

type
  TMyObject = object
    constructor Init; virtual;
  end;

constructor TMyObject.Init;
begin
end;

begin
end.

{ このコードはオブジェクト型では持てない仮想コンストラクタを宣言しようとしている }

program Solve;

type
  TMyObject = object
    constructor Init;
  end;

constructor TMyObject.Init;
begin
end;

begin
end.

{ コンストラクタを静的にするか，仮想コンストラクタを持てるクラス型を使用すれば解決する }