Delphi - 使用另一个单元的接口(interface)

Question

我不断收到:我在另一个单元中定义的接口(interface)类型的未声明标识符。这是我所拥有的:

unit Drawers;

interface

implementation

type

  IDrawer = interface
  ['{070B4742-89C6-4A69-80E2-9441F170F876}']
    procedure Draw();
  end;

end.

<小时/>

unit Field;

interface

uses
  Graphics, Classes, Drawers;

TField = class(TInterfacedObject, IField)
private
  FSymbolDrawer: IDrawer;

在 FSymbolDrawer 中，我收到编译器错误。

当然我有抽屉的用途；在定义 TField 的单元中。

这是关于什么的？

谢谢

Answer 1

在单元Drawers中，IDrawer的类型声明必须位于单元的接口(interface)部分。您已将其插入到实现部分中，该部分仅对单元内声明可见。

这是代码:

unit Drawers;

interface

type

  IDrawer = interface
  ['{070B4742-89C6-4A69-80E2-9441F170F876}']
    procedure Draw();
  end;

implementation

end.