delphi - Delphi 中重载过程出错

Question

出于某种原因，我现在收到此错误“[DCC Error] MyFile.pas(52): E2137 在基类中找不到方法“分配””。这是我的分配程序的一个片段，它运行良好，直到我再添加一个，即最后一个分配。

procedure Assign(MyClass: TMyClass); overload; override;
procedure Assign(MyClass: ThisService.MyClass); overload; override;
procedure Assign(MyClass: ThatService.MyClass); overload; override;
procedure Assign(MyClass: TXMLMyClass); overload; override;
procedure Assign(MyClass: pbStruct1Messages.TMyRecord); overload; override;
procedure Assign(MyClass: pbStruct2Messages.TMyRecord); overload; override;

Answer 1

当您使用override时，您是说您正在使用从父类继承的相同签名来重写虚拟方法。如果父类没有具有该签名的虚拟方法，那么编译器将正确地提示它找不到它。

检查祖先类以确认该方法确实存在。如果它不存在，则不要在后代类中使用 override 标记它。