delphi 单元文件详释

 

 

 
 

unit UnitInfo;//单元文件名，也是一个类说明的开始

interface   //接口部分，在此处声明的过程、变量可为其他单元所用

uses        //若本单元要用到其他的单元，则要把它的单元文件名放入到uses子句后
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type        //类型声明，若有自己的类型需要手工加入。
  TForm1 = class(TForm)   //类TForm1由TForm总类派生
            //以下是类的组成部分（域、方法、属性）的声明
    Button1: TButton;  //按钮组件
    Label1: TLabel;    //标签组件
    procedure Button1Click(Sender: TObject); //过程声明，事件驱动
  private
    { Private declarations } //private处的声明只能为本对象所用
  public
    { Public declarations }  //public处的声明为单元公用
  end;

var              //变量、常量、标号等声明
  Form1: TForm1; //Form1是TForm1的一个实例

implementation   //实现部分

{$R *.dfm}       //编译指令

//------------------------------------------------------------------------------
procedure TForm1.Button1Click(Sender: TObject);
//过程执行代码，响应鼠标单击事件（封装的消息）
begin
  Close;  //关闭窗体，执行的代码
end;

end.
//------------------------------------------------------------------------------