从tframe引用主窗体

时间:2016-05-17 06:54:10

标签: forms unit-testing delphi

我使用Delphi Turbo。

我有主单位
main_u和表单main:tmain
然后我有下一个单位
dok_f_u和Tdok_f = class(TFrame)

在主窗体上有pagecontrol1:tpagecontrol和代码,打开新文档作为页面控件上的另一个标签页,并为每个标签页创建Tdok_f框架。

tmain有一些方法可以做到这一点:

procedure Tmain.opendoctab(i: integer); // i: numbe of doc

此过程创建新的标签页并在其上放置新创建的tdok_f并使其成为活动标签。

文档是指任何其他文档,而在Tdok_f上有相关文档列表 - 在列表上的dblclick之后,应该打开选定的相关文档。所以我在t_dok_f单元中的USES中添加main_u,并在tmain的代码方法中使用 main.opendoctab(XYZ);

它没有任何问题,但在开发应用程序后,我发现它无法正常工作。

我发现单位dok_f_u中的主要对象与main_u中的主要对象不同。 就像有很多主要形式。 当我从main.showmodal;拨打dok_f_u时,我在屏幕上看到了2个分开的表单。像两个tmain对象(表单)一样被创建。

请帮忙

0 个答案:

没有答案