delphi – 接口和属性可见性

ISomeProperties = interface
  ['{3AD52E4E-5190-4ABE-8AFC-062295E3A352}']
    function GetPort: integer;
    procedure SetPort(const Port: integer);
  end;

GetFunction和SetFunction在代码complection中可见.但在我添加这样的属性之后

ISomeProperties = interface
  ['{3AD52E4E-5190-4ABE-8AFC-062295E3A352}']
    function GetPort: integer;
    procedure SetPort(const Port: integer);
    property Port: integer read GetPort write SetPort;
  end;

GetPort和SetPort方法仅消失属性端口可见 – 很棒.

现在我实现一个接口

TSomeProperties = class(TInterfacedObject,ISomeProperties)
  private
    function GetPort: integer;
    procedure SetPort(const Port: integer);
  end;

但是从实现接口的类中看不到属性Port！这是一种理想的行为还是我做错了什么？