pascal 视频教程_pascal和basic_pascal选择排序(5)

uses

SysUtils, Types, Classes, QGraphics, QControls, QForms, QDialogs;

}

type

TForm2 = class(TForm)

Label1: TLabel;

CancelButton: TButton;

procedure CancelButtonClick(Sender: TObject);

procedure FormClose(Sender: TObject; var Action: TCloseAction);

end;

var

Form2: TForm2;

implementation

uses Unit1;

- 6 -

Overview

{$R *.dfm}

procedure TForm2.CancelButtonClick(Sender: TObject);

begin

Form2.Close;

end;

end.

Unit2单元创建了类TForm2和它的一个实例Form2。TForm2包含一个按钮（CancelButton，TButton的一个实例）和一个标签（Label1，TLabel的一个实例）。Label1将显示 ”Hello world!” 标题，但从源代码中你不能看到这一点。标题是在Form2的窗体文件Unit2.dfm中定义的。

Unit2单元定义了一个过程。在运行时，当用户点击CancelButton时，TForm2.CancelButtonClick将被调用，它关闭Form2。这个过程（以及Unit1单元的TForm1.Button1Click）是作为事件句柄，因为它们响应程序运行时发生的事件。事件句柄通过窗体文件（Windows下是 .dfm，Linux下是 .xfm）赋给指定的事件（事件是一种特殊的属性）。

当Greeting程序启动时，显示Form1而隐藏Form2（默认情况下，只有工程文件中最先创建的窗体是可见的，它称为主窗口）。当用户点击Form1上的按钮时，Form1消失而被Form2取代，后者将显示 ”Hello world!” 信息。当用户关闭Form2（点击CancelButton按钮或窗口标题栏上的关闭按钮）后，Form1重新显示。

- 7 -

Programs and units

Programs and units（程序和单元）

Programs and units: Overview（概述）

一个程序由称为单元的源代码模块构成。每个单元保存在一个单独的文件中并分别进行编译，编译后的单元被链接到程序中。单元允许你

? 创建可以在程序间共享的库

? 不必提供源代码就可以向其它开发者分发共享库

在传统的Pascal编程中，所有源代码，包括主程序都存储在 .pas 文件中。Borland

程文件（.dpr）来存储‘主’程序，而大部分源代码则保存在单元文件（.pas）中。每个程序（或工程）包含一个工程文件和一个或多个单元文件（严格说来，你不必在一个工程中明确引用任何单元，但所有程序自动引用System单元）。要生成程序，编译器需要每个单元的源代码（.pas）或编译单元

Program structure and syntax（程序的结构和语法）

Program structrue and syntax: Overview（概述）

一个程序包括

? 一个程序头（program heading）

? 一个uses子句（可选），和

? 一个包含声明和命令语句的块（block）

程序头指定程序的名称；uses子句列出了程序引用的单元；块包含声明和命令语句，

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-23665-5.html