DELPHI中框架的使用

最新推荐文章于 2023-03-13 09:51:06 发布

原创最新推荐文章于 2023-03-13 09:51:06 发布 · 1.2k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#delphi #框架 #integer

在DELPHI中，框架的使用通常涉及创建主窗口和多个子窗口。通过NEW-FRAM建立子窗口后，可以在主窗口调用它们。有两种调用方法：一是使用FRAMS控件加载所有子窗口，简单但不易控制；二是自定义显示子窗口的函数，例如`ShowFrame`，在每次打开前清理组件，并根据参数决定显示哪个子窗口。这种方法虽然更复杂，但能更好地控制窗口更新。

在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:
        '
        '
        '