在DELPHI中使用框架,一般步骤就是先建好一个主窗口,然后再通过NEW-FRAM来建立个个页窗口,建好后,再在主窗口不断的调用这些页窗口就可以了,关建就在如何调用这些页窗口,以至达到良好的框架式的开发呢?有两个方法:一是在STAND页上有一个FRAMS的控件, 你只需把所有的子窗口通过ADD PROJECT加入到此工程项目来,然后通过此控件一个一个的加载到主窗口,再设置你的菜单,定义对应的显示这些子窗口的事件就可以了,这种做法做起来是非常的简单,方便,但不利于控制,为什么这么说呢?因为当你一改动子窗口时,在主窗口又得重新加载它一次,否则在主窗口显示出来的还是原来的,不会随你的改变而改变.所以此方法看起来简单,但做起来相当麻烦,我建义用第二种方法,第二种方法就是自己建一个显示子窗口的函数,如下所示:

produce ShowFrame(Nomber:integer);
var
    i:integer;
begin
         {每次打开子窗口前都要先清理一次}
         for i:=0 to compent.count-1 do
         if(self.compent[i].type is Tframe) then (self.compent[i].free);
        {要显示哪个窗口,对各窗口的定义}
         case Nomber of
         1:
         begin
                  with Tframe1.create(self) do  //一定要写这个,否则是看不到的,还要在主窗口加上uses frmae1单元名
                   begin
                            parent:=form1//父窗体名
                           left:=20;//左边矩
                           top:=50;
                           show;
                  end;
        end;
        2:
        '
        '
        '

Posted on 2009-12-11 15:58  在路上只为温暖我的人  阅读(672)  评论(0编辑  收藏  举报