delphi如何优雅的创建界面?

优雅的创建delphi界面

刚开始学习delphi的朋友在创建界面的时候,喜欢把组件都堆到面板上面,需要制作多个界面就用多个面板。这样固然可以,但是一个程序如果界面多了后期的维护那是很蛋疼的,代码和界面看着凌乱不堪。简直无法忍受。
现在教新手如何优雅的创建界面。
1.先创建主窗体,把系统必要的菜单或组件放到主窗体上,如下图所示:
在这里插入图片描述
2.创建一个VCL Frame窗体,以日志为例如下图所示:
在这里插入图片描述
在这里插入图片描述
将日志页面的组件全部放到logFrame这个窗体中。
然后再主窗体中点击系统日志直接创建回显日志窗体即可,这样的好处是即使有很多页面,每个页面都是独立的,好维护。无需全部将组件堆叠再一个面板中。具体实现调用代码如下所示(仅提供思路参考):

//打开日志
procedure TmainFrame.N1Click(Sender: TObject);
begin
  ui.loadUi(1,nil);
end;
{
  Tag 1.日志
}
procedure loadUi(tag: NativeInt;data:ISuperObject);
begin
  case tag of
    0:
      begin
        mainFrame.Show;
      end;
    1:
      begin
        if Assigned(logFrame) then   //判断日志窗体是否已经创建
        begin
          logFrame.Parent := mainFrame; //设置日志窗体的父级为主窗体
          logFrame.BringToFront;  //将当前日志窗体置顶显示
          logFrame.Show;
        end
        else
        begin
          logFrame := TlogFrame.Create(logFrame);
          logFrame.Parent := mainFrame;
          logFrame.Show;
        end;
      end;
end;

点击日志后效果如下图所示:
在这里插入图片描述

  • 1
    点赞
  • 4
    收藏
  • 打赏
    打赏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
©️2022 CSDN 皮肤主题:技术黑板 设计师:CSDN官方博客 返回首页
评论

打赏作者

老鼠爱上mao

你的鼓励将是我创作的最大动力

¥2 ¥4 ¥6 ¥10 ¥20
输入1-500的整数
余额支付 (余额:-- )
扫码支付
扫码支付:¥2
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、C币套餐、付费专栏及课程。

余额充值