[医学]081第二章Object_Pascal.ppt

1. 空白单元文件 打开一个新的项目，则产生一个新的窗体，相应的单元文件代码为： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} end. 其中Type关键字后以关键字class定义了一个新的对象，该对象是从TForm对象类中派生而来。其后的关键字Var之后定义了一个TForm类的变量Form1。 2. 添加组件之后单元文件的变化 添加一个Button组件之后，单元文件的Type部分变为： type TForm1 = class(TForm) Button1: TButton; private { Private declarations } public { Public declarations } end; 这里Delphi将一个名为Button1的Button实例(从Tbutton派生而来)添加到Tform对象中。 3. 添加事件处理过程之后单元文件的变化 若为Button编写一个事件处理过程后，单元文件的Type部分又变为： type TForm1 = class(TForm) Button1: TButton; Procedure TForm1.Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; 即在将一个名为Button1Click的方法添加到TForm对象中。 TForm单元文件的private部分所定义的任何数据和方法在其它单元中都是看不到的，也不能使用。而在public部分所定义的数据和方法都可以被其它单元中使用。访问其它单元的公共方法的一般语法是： 窗体名.公共方法名 4. 变量的作用域 在一个程序中定义的变量，按其定义的形式和位置有不同的作用范围：全局的和局部的。 全局变量在程序的TYPE区域定义，在整个程序中有效。 局部变量在过程或函数的定义部分定义，只在定义它的过程或函数中有效。 若两种变量同名，则在过程或函数外，全局变量有效。 但变量作用域的实际情况要复杂得多，大体上有下列几种情况： ·在一个单元的Private部分定义的任何数据和方法在其它单元中看不到，也不能使用； ·在一个单元的Public部分定义的任何数据和方法都可被其它单元使用； 访问其它单元中公共方法的格式为： 窗体名.公共方法名 ·在一个单元的Implemantation定义的数据(和方法)是本单元的公有部分； ·在一个函数或者过程内部定义的数据(和方法)只能在其内部使用。 2.10.2 项目文件 在Delphi的集成开发环境中，通过项目的方式对应用程序开发过程中的各类文件进行组织和管理。与所开发的应用程序有关的文件都组织在一个项目中，项目中的一些文件是在设计阶段产生的，另一些是在项目编译和连接后产生的。 项目文件是一个项目的主程序。在项目文件中，列出了该项目所使用的所有单元文件。通过单元文件的列表，编译器将分别编译每个单元文件，最后连接成可执行的文件(.EXE)或动态连接库(.DLL) 1. 给项目添加文件 ① 添加一个新窗体 选择File|New|Form菜单命令或单击New Form按钮。这时相应的单元文件自动加入。 ② 只添加一个新单元文件 选择File|New|Unit菜单命令。 ③ 给项目中添加已有文件 选择Project|Add to Project菜单命令或单击Add File To Project按钮。 将一个文件添加到项目中后，在项目文件的Uses语句中加入该文件的完整路径名，也就是指向这个文件的指针，并没有将文件添加进来。 2. 在项目中删除文件 选择Project|Remove from Project或单击Remove File from Project按钮。 这时并非真正删除一个文件，而只是删除了指向文件的“指针”。 在项目中删除的文件，若要将其从磁盘上删除，可以使用Windows的文件操作来完成，如在“资源管理器”窗口中或“我的电脑”中操作。 3.