本文主要是介绍(delphi11最新学习资料) Object Pascal 学习笔记---第8章第7节(可视化窗体继承),希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!
8.7 可视化窗体继承
继承不仅用于库类或你编写的类,而且在整个基于 Object Pascal 的开发环境中相当普遍。正如我们所看到的,当你在集成开发环境中创建一个窗体时,这个窗体就是一个继承自 TForm 的类的实例。因此,任何可视化应用程序都有一个基于继承的结构,即使你最终将大部分代码编写成简单的事件处理程序。
但鲜为人知的是,即使是经验丰富的开发人员,也可以从已创建的窗体继承一个新窗体,这种功能通常被称为可视化窗体继承(这也是 Object Pascal 开发环境所特有的)。
这里的有趣之处在于,你可以直观地看到继承的强大功能,并直接找出其规则!这在实践中有用吗?这主要取决于你正在构建的应用程序的类型。如果它有许多窗体,其中有些窗体彼此非常相似,或者只是包含了共同的元素,那么你就可以将共同的组件和共同的事件处理程序放在基本窗体中,然后将特定的行为和组件添加到子类中。另一种常见的情况是,使用可视化窗体继承为特定公司定制应用程序的某些窗体,而无需重复任何源代码(这也是首先使用继承的核心原因)。
您还可以使用可视化窗体继承为不同的操作系统和不同的窗体因素(例如从手机到平板电脑)定制应用程序,而无需重复任何源代码或窗体定义代码;只需从标准窗体继承特定的版本即可。
请记住,可视化继承的主要优势在于,您可以在以后更改原始窗体,并自动更新所有派生窗体。这是面向对象编程语言中众所周知的继承优势。但还有一个有益的副作用:多态性。你可以在基本窗体中添加一个虚拟方法,并在子类窗体中覆盖该方法。然后,您就可以时引用这两个窗体,并为每个窗体调用该方法。
注解:使用相同元素构建窗体的另一种方法是依靠框架,即窗体面板的可视化组合。在这两种情况下,设计时都可以对一个窗体的两个版本进行处理。不过,在可视化窗体继承中,您需要定义两个不同的类(父类和派生类),而在框架中,您只需处理一个框架类和由窗体托管的该框架实例。
8.7.1 从基本窗体继承
一旦你对继承有了明确的概念,可视化窗体继承的规则就会变得非常简单。基本上,子类窗体拥有与父类窗体相同的组件以及一些新组件。你不能移除基类的组件,尽管(如果是可视化控件)你可以让它不可见。重要的是,你可以轻松更改继承组件的属性。
请注意,如果更改了继承窗体中组件的某个属性,对父窗体中相同属性的任何修改都不会产生影响。更改组件的其他属性也会影响继承版本。您可以使用 "对象检查器 "的 "Revert to Inherited"的本地菜单命令重新同步两个属性值。将两个属性设置为相同的值并重新编译代码也能达到同样的目的。修改多个属性后,可以通过应用组件本地菜单的 "Revert to Inherited"命令,将所有属性重新同步到基础版本。
除了继承组件,新窗体还继承了基础窗体的所有方法,包括事件处理程序。你可以在继承的窗体中添加新的处理程序,也可以覆盖现有的处理程序。
为了演示可视化窗体继承的工作原理,我制作了一个非常简单的示例,名为 VisualInheritTest。下面我将逐步介绍如何创建它。首先,启动一个新的多设备项目,选择一个空白项目,并在其主窗体中添加两个按钮。然后选择 “文件"→"新建"→"其他”,在New Items对话框中选择 "Inheritable Items "页面(见图 8.3)。在这里可以选择要继承的窗体。
图 8.3:通过 "新项目 "对话框可以创建继承窗体。
新窗体具有相同的两个按钮。以下是新窗体的初始文本描述:
inherited Form2: TForm2Caption = 'Form2'...
end;
这里是它的初始类声明,可以看到基类不是通常的 TForm,而是实际的基类窗体:
typeTForm2 = class(TForm1)private{ Private declarations }public{ Public declarations }end;
注意文本描述中出现的 inherited
关键字;还请注意,窗体确实有一些组件,尽管它们是在基类窗体中定义的。如果更改其中一个按钮的标题并添加一个新按钮,文字说明也会相应更改:
inherited Form2: TForm2Caption = 'Form2'...inherited Button1: TButtonText = 'Hide Form'endobject Button3: TButton...Text = 'New Button'OnClick = Button3Clickend
end;
只有具有不同值的属性才会被列出,因为其他属性只是被原样继承。
图 8.4: VirtualInheritTest 示例的两个表单在运行时
第一个窗体的每个按钮都有一个 OnClick 处理程序,代码很简单。第一个按钮显示第二个窗体并调用其 Show 方法,而第二个按钮显示一条简单的消息。
在继承窗体中会发生什么?我们首先要改变显示按钮的行为,将其作为隐藏按钮来实现。这意味着不执行基类事件处理程序(因此我注释掉了默认的继承调用)。至于 Hello 按钮,我们将通过保留继承调用,在基类显示的信息中添加第二条信息:
procedure TForm2.Button1Click(Sender: TObject);
begin// Inherited;Hide;
end;procedure TForm2.Button2Click(Sender: TObject);
begininherited;ShowMessage('Hello from Form2');
end;
请记住,继承的方法可以使用 inherited
关键字调用同名的基类方法,而在事件处理程序中,inherited
关键字代表对父窗体相应事件处理程序的调用(无论事件处理程序方法名称如何)。
当然,你也可以将基类窗体的每个方法视为你的窗体的一个方法,并自由调用它们。通过这个示例,你可以探索可视化窗体继承的一些特性,但要想看到它的真正威力,你还需要研究更复杂的实际示例,而本书没有足够的空间来进行探索。
这篇关于(delphi11最新学习资料) Object Pascal 学习笔记---第8章第7节(可视化窗体继承)的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!