我有一个窗体，想实现重用

Question

我有一个窗体，想实现重用。也就是想作为模版，我用一下方法：首先我的窗体是这样的：（举一个简单的例子）
  在form1中按下按钮firstbutton1可以调出form2,在form2中按下按钮secondbutton1可以调出form3。
 
我的代码是：
在FORM1中：
  USES UNIT2；
  PROCEDURE TFOMR1.firstbutton1()
   BEGIN
      FORM2.SHOW;
   end;在FORM2中：
  USES UNIT3；
  PROCEDURE TFOMR2.secondbutton1()
   BEGIN
      FORM3.SHOW;
   end;
我想把form1作为模版，可以作为单独的另外一个窗体使用。请问该如何办好？  
 

Answer 1

我在form1的窗体下右击--》选择ADD TO REPOSITORY--》，我选择了FORM，建立一个模块，但是我感到如果是只有一个窗体form1，而在form1中没有转到其他窗体form2,form2也没有转到form3的操作，这时没有问题。问题的关键是form1中有转到其他窗体form2,form2也有转到form3的操作，这时就出问题。比如对上例，我用NEW-》FORM-》选择模版-》OK，生成一个新窗体（比如说是EXAMFORM），运行EXAMFORM，系统显示找不到unit2.dcu。这时什么原因？如何解决？谢谢。

Answer 2

在窗体上单击鼠标右键，在弹出菜单中选择“Add to Repository”，按照提示做完。以后在Delphi菜单File->New->Other...中就可以使用你自定义的模板了。

Answer 3

在窗体上单击鼠标右键，在弹出菜单中选择“Add to Repository”这一步我做了。问题的关键是form1中有转到其他窗体form2,form2也有转到form3的操作，这时就出问题。比如对上例，我用File->NEW-》
在NEW ITEMS中选择 FORM-》选择模版-》OK，生成一个新窗体（比如说是EXAMFORM），运行EXAMFORM，系统显示找不到unit2.dcu。这时什么原因？如何解决？谢谢。

Answer 4

ShowModal：看模版 请问是什么意思？

Answer 5

每次新建窗体的时候，在它弹出的新建类型框时，选择Form项是你已经建好的模板窗体！

Answer 6

第二种方法：以前什么工作也不用做，
每次新建窗体的时候，在它弹出的新建类型框时，选择Project里面你已经建好的模板窗体！

Answer 7

with TForm2.create(nil) do
  begin
    ShowModal;
    Free;
  end;

Answer 8

象你的方法可以加一个窗体（这个没有问题），但是如果是多个窗体可能就不行，可以考虑别的办法吧。比方说把你写好的.pas,.dfm文件存保起来，下次要用的时候直接Copy下来，加到工程中，uses一下再用就可以了。

Answer 9

如果是想重用窗体，我想，frame估计更能符合你的要求。

Answer 10

后面的朋友对不起了，我等了很久，因为我明天要出去，不能上网，必须今天结。sorry