E2420 インターフェース '%s'（'%s' で使用）がまだ完全に定義されていません (Delphi)

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

使用されるインターフェースの定義が不完全です。前方参照宣言されるインターフェースは，それらが使用されるセクションと同じ型のセクションで宣言する必要があります。たとえば，次のコードは，上のエラーメッセージが原因でコンパイルされません。

program Project3;

{$APPTYPE CONSOLE}

type
  TInterface = interface;

  TFoo = class
    type
      TBar = class(TObject, TInterface)
        procedure Bar;
      end;
  end;

  TInterface = interface
    procedure Intf;
  end;

procedure TFoo.TBar.Bar;
begin

end;

begin
end.