• Delphi Controls (控件)和Components (组件)的异同


           在写代码时遇到这么一个问题,我想遍历Rzpanel上的组件(控件),将用户填写的数据清空。最开始使用的遍历语句是:for i:=0 to Sender.ComponentCount - 1 do(Sender传递进来的是Panel)。

           测试了几次没有实现清空的目标,后面发现使用for i:=0 to Sender.ControlCount - 1 do之后却可以。

           那么问题来了,为什么Control可以,而Component不可以?

    经过测试与网络查证有这么几个关键的信息需要记录:

          1、一个Controls控件继承自Components 组件

               TControl = class(TComponent);

               TWinControl = class(TControl);

               有了这些继承之后才有多种可视化控件;

          2、控件有Owner和Parent两个属性:

               Owner指的是窗体,而不是上一级控件(这也是为什么控件是在窗体销毁时销毁);

               Parent是层级关系,方便布局。

               举个例子来理解,在需要用户进行填写某一项比较重要的数据的时候可以:

               在当前窗体设置一个Panel并且编写相应代码(同一个窗体代码也方便编写);当需要展示时,创建一个新的窗体(由于是新的窗体方便设置窗体属性也方便管理),然后把Panel放置在新的窗体上Panel.Parent:=NewForm进行展示,由于Panel的Owner是当前窗体所以当新窗体销毁时Panel并没有销毁。

               依据上面这个例子,在写框架时自然会想到写一个公用的函数或过程:ShowPanelByForm。

    经过以上理解,不难想到,Panel.ComponentCount=0,导致实现不了想要的结果;但是如果不是Panel而是Form本身就可以。

    附上一篇也说明这个问题的帖子:Delphi Controls (控件)和Components (组件)的区别_51CTO博客_delphi常用控件

  • 相关阅读:
    按图搜索义乌购商品(拍立淘) API
    sql13(Leetcode570至少有5名直接下属的经理)
    [Python进阶] 消息框、弹窗:pymsgbox.alert
    谈一谈在两个商业项目中使用MVI架构后的感悟
    BeanFactory与ApplicationContext
    JavaScript 设计模式:发布订阅
    Linux安装mysql
    深入浅出Viterbi算法与python实现
    【无标题】
    Servlet详细教程
  • 原文地址:https://blog.csdn.net/yangjian900109/article/details/127822791