（2）BorderIcon属性用于定制窗体的标题栏，该 BorderIcon属性用于定制窗体的标题栏，该 属性为集合类型，集合元素及其含义见表4 属性为集合类型，集合元素及其含义见表4-3。
表4-3 BorderIcon属性的元素及其含义 BorderIcon属性的元素及其含义
元素 biSystemMenu biMinimize biMaximize biHelp 含义 窗体的标题栏中含系统菜单（位于左端） 窗体的标题栏中含最小化按钮（位于右端） 窗体的标题栏中含最大化按钮（位于右端） 当BorderIcon属性不含有biMinimize和biMaximize 时，窗体标题栏中含有帮助按钮（位于右端）
第四章 Delphi主体窗体制作 Delphi主体窗体制作
4.1创建新窗体 创建新窗体 4.2 窗体的属性、方法和事件 窗体的属性、 4.3 设计窗体
Delphi简明教程 简明教程
清华大学出版社
1
4.1创建新窗体 4.1创建新窗体
在Delphi的应用程序的开发过程中， 创建窗体往往是用户进行程序设计的第一 步。实际上，只要启动Delphi，系统就会 自动产生一个窗体，这在前面已经进行了 介绍。目前，尽管用户除了进入到Delphi 的开发环境还都什么都没有做，但系统已 经提供了一个完整的Windows应用程序， 这时只要用户选择Run菜单的Run命令，这 个用户没有做任何操作的应用程序就可以 运行。当然，这个应用程序对
图4-2 提示信息 Delphi简明教程 简明教程 清华大学出版社 5
单击yes按钮，Delphi将自动在Main单元的 代码中添加对单元unit2的引用。 也可以手工实现在Main单元中添加对单元 unit2 的 引 用 代 码 ， 单 击 cancel 按 钮 ， 然 后 在 Main单元的实现部分（implementation）添加如 下代码： implementation uses Unit2；
表4-2 FormStyle属性的取值及其说明 FormStyle属性的取值及其说明
取值 fsNormal fsMDIChild fsMDIForm fsStayOnTop 说明 普通的窗体 MDI（多文档窗体）子窗体 MDI主窗体 位于桌面顶层的窗体
Delphi简明教程 简明教程
清华大学出版社
14
4.2 窗体的属性、方法和事件
4.2.1 设置窗体属性
可以调整或设置窗体的大小、风格、标题、名 称等属性来确定其外观和特征。 1、窗体的位置及大小 、 与窗体位置及大小有关的属性有Height、Width、 Top、Left、Position、Align属性。 其中Height和Width分别决定了窗体的高度和宽 度，Top和Left属性则决定窗体的左上角相对于屏幕 左上角的坐标。
（5）HorzScrollBar和VertScrollBar属性分别用于设置窗体的 HorzScrollBar和VertScrollBar属性分别用于设置窗体的 水平和垂直滚动条。 水平和垂直滚动条。 除了以上介绍的属性之外，窗体还拥有其他许多属性， 除了以上介绍的属性之外，窗体还拥有其他许多属性，其 取值与用法可查阅Delphi的联机帮助。 取值与用法可查阅Delphi的联机帮助。 Delphi简明教程 简明教程 清华大学出版社 18
Delphi简明教程 简明教程
清华大学出版社
3
图4-1 新建的Form2窗体 新建的Form2窗体 （ 3 ） 修改主窗体：在主窗体 Form1 中增加按钮 修改主窗体：在主窗体Form1 Button1 Button2 Button3 并修改其属性如4 Button1、Button2、Button3，并修改其属性如4-1 右图所示。 并为按钮Button2 编写单击（ OnClick） 右图所示 。 并为按钮 Button2 编写单击 （ OnClick ） 事件过程代码如下：
Delphi简明ion属性也是用来确定窗体在屏幕中的位置， 但 仅 当 Align 属 性 alNone 时 才 有 效 。 此 时 ， 若 Position属性取值为poDesigned，窗体的位置由Top 和Left属性来确定；若Position属性取值为其它值， 则 Top 和 Left 属 性 无 效 。 Position 属 性 取 值 为 poScreenCenter，窗体位于屏幕的中央。 2、窗体的名称与标题 、 对象的名称即Name属性的取值，被用来唯一地 标识对象，窗体也不例外。Name属性的取值不能 为空。应注意，若工程中有多个窗体时，名称不能 相同。 窗体的标题由Caption属性来确定，该属性可以为 空。缺省时，Caption属性与Name属性相同。
BsSizeToolWindow
说明 标准对话框风格的边界，运行时不能改变窗体的 大小 窗体边界为单线，运行时不能改变窗体的大小 运行时窗体无边界线，且不能改变窗体的大小 运行时可以改变窗体的大小 运行时与BsDialog的外观相似，只是标题栏较小， 不能改变窗体的大小 运行时与BsDialog的外观相似，只是标题栏较小， 能改变窗体的大小
Delphi简明教程 简明教程 清华大学出版社 13
3、窗体的外观与风格 与 窗 体 的 外 观 与 风 格 有 关 的 属 性 有 FormStyle 、 BorderIcon 、 BorderStyle 、 WindowStyle 、 HorzScrollBar和VertScrollBar属性。 HorzScrollBar和VertScrollBar属性。 （1）FormStyle 属性用于确定窗体的类型， 属性用于确定窗体的类型，该属 性为枚举类型。属性的取值及其说明见表4 性为枚举类型。属性的取值及其说明见表4-2。
Delphi简明教程 简明教程
清华大学出版社
6
（5）保存并运行工程，单击主窗体上的按钮“创 保存并运行工程，单击主窗体上的按钮“ 建新窗体” 显示结果如图4 建新窗体”。显示结果如图4-3。
图4-3 工程的运行结果 Delphi简明教程 简明教程 清华大学出版社 7
2、动态创建新窗体 、 用上述方法创建的多窗体的工程，在运行时 将把所有的窗体装入内存。如果工程非常复杂 ，系统资源将变得非常紧张。这种情况最好使 用这种方法：在需要某个窗体的时候，临时创 建，使用完后再将其释放。 在上面的工程中进行修改。 （1）修改工程选项。选择Project|Options，系统 打开“Project Options”对话框。在“Form”选项 卡 中 ， 所 有 工 程 的 窗 体 出 现 在 “ Auto-Creat Form”列表框中，表示这些窗体在运行时都是 在内存中自动创建的。选中Form2，将其移至 “Availableforms”列表框中，如图4-4。
Delphi简明教程 简明教程 清华大学出版社 11
Align属性用来设定窗体相对于屏幕的对齐方式 ， Align 属性用来设定窗体相对于屏幕的对齐方式， 该属 性的类型为枚举类型，取值见表4 性的类型为枚举类型，取值见表4-1。
取值 alButton alClient alLeft alNone alRight alTop 表4-1 Align属性的取值 Align属性的取值 说明 窗体位于屏幕的下方，宽度为整个屏幕宽（Width属 性失败），高度为Height 窗体占据屏幕的中部Width与Height属性失败 窗体位于屏幕的左方，宽度为Width，高度为整个屏 幕高（Height属性失败） 其他属性有效 窗体位于屏幕的右方，宽度为Width，高度为整个屏 幕高（Height属性失败） 窗体位于屏幕的上方，宽度为整个屏幕宽（Width属 性失败），高度为Height
4.2.2 窗体的方法
窗体对象从其父类TCustomForm中继承了多种方法， 其中最常用的方法见表4-6。
表4-6 窗体的常用方法
方法名称 Creat Close CloseQuery Release Show ShowModa l Print 说明 用来创建一个窗体并进行初始化，同时引发一个OnCreat事件。应 该方法创建的窗体需要调用Show方法使之可见 用来关闭一个显示中的窗体，同时调用CloseQuery方法来判断是 否可以关闭，若可以，则引发一个OnClose事件并关闭窗体 用来判断窗体是否可以被关闭，返回一个逻辑值 用于将窗体对象从内存中彻底清除 用于显示窗体，同时引发一个OnShow事件 用于显示一个模式窗体，同时引发一个OnShow事件 用于打印窗体
Delphi简明教程 简明教程 清华大学出版社 8
图4-4 Project Options对话框 Options对话框 Delphi简明教程 简明教程 清华大学出版社 9
（ 2 ） 修 改 代 码 。 修 改 主 窗 体 中 按 钮 Button2 的 单 击 （ OnClick）事件过程代码： Procedure TForm1.Button2Click(Serder : Tobject)； Begin Form2 :=TForm2.Creat(nil)； //使用Creat方法来创建并完 成Form2的初始化 Form2.Show； End； 增加Form2中关闭（OnClick）事件的过程代码： Procedure TForm2.FormClose(Serder : Tobject；var Action : tCloseAction)： begin form2.Release；//释放form2所占的系统资源 end； 返回 Delphi简明教程 简明教程 清华大学出版社 10
Delphi简明教程 简明教程
清华大学出版社
15
（3）BorderStyle属性用于确定窗体边界的类型，该属性 BorderStyle属性用于确定窗体边界的类型， 为枚举类型，取值及其含义见表4 为枚举类型，取值及其含义见表4-4.
表4-4 BorderStyle属性的取值 BorderStyle属性的取值 属性值 BsDialog BsSingle BsNone BsSizeable BsToolWindow