Delphi 2010中，TDataModule如何实现继承？

本文共计174个文字，预计阅读时间需要1分钟。

当我在Delphi中尝试继承TDataModule时，Delphi将后代类视为一种形式，因为它为它们提供了字体和客户端端属性等属性。在运行时，如果这些属性不存在，会引发异常。

以下是一个简化的代码示例：

pascalTDM=class(TDataModule)end;

TDMTix=class(TTixDataModule)end;

当我试图继承TDataModule时,Delphi将后代类视为一种形式,为它们提供字体和客户端属性等属性. (运行时“属性不存在”异常)

TixDataModule = class(TDataModule); TDM = class(TixDataModule) end;

我能做些什么才能让它发挥作用？

>由于TixDatamodule只是TDatamodule的同义词,您可以直接从TDataModule继承 >如果您真的想从TixDataModule继承,那么将TixDataModule放在一个单独的单元中,并使用自己的.dfm.