delphi – 如何同时创建两个类的实例？

概述这是我的问题 – 很快： var c1:TClass1;c2:TClass2;begin c1 := c1.Create; c2 := c2.Create; //<<Exception;end; 这两个类都继承自TObject.如果它们不继承,那么我不能在类中使用调试器,所以我必须使用TObject. 我真正的问题是我必须在第一个类的实例中的函数内创建第二个类的实例.当我在其中时,我 这是我的问题 – 很快：

var c1:TClass1;c2:TClass2;begin  c1 := c1.Create;  c2 := c2.Create; //<<Exception;end;

这两个类都继承自TObject.如果它们不继承,那么我不能在类中使用调试器,所以我必须使用TObject.

我真正的问题是我必须在第一个类的实例中的函数内创建第二个类的实例.当我在其中时,我无法找到释放第一个类的实例的方法.

看来我不能有多个继承自TObject的类,那是问题吗？

如何修复我的代码,任何建议？

提前致谢！

解决方法 正确的语法应该是：

C1 := TClass1.Create;C2 := TClass2.Create;

总结

以上是内存溢出为你收集整理的delphi – 如何同时创建两个类的实例？全部内容，希望文章能够帮你解决delphi – 如何同时创建两个类的实例？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。