UC知道懂Delphi进，答的好还有更高分奖励..
来源：百度知道 编辑：UC知道 时间：2024/06/04 12:05:21
各位大虾你们好，
问题太菜了，不要见笑……
希望各位给予细心细心再细心的讲解...（小弟刚接触DELPHI）
大恩不言谢；
这只是delphi7打开后的代码栏里自带的一点代码，
希望大家给详细注释一下，谢谢了
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.
讲的细心高分再奖励....
一楼的
叫你给我解释一下，
实际一点....好不啊？
问题太菜了，不要见笑……
希望各位给予细心细心再细心的讲解...（小弟刚接触DELPHI）
大恩不言谢；
这只是delphi7打开后的代码栏里自带的一点代码，
希望大家给详细注释一下，谢谢了
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.
讲的细心高分再奖励....
一楼的
叫你给我解释一下，
实际一点....好不啊？
我解释部分：
unit Unit1; //模块名称
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs; //引用模块
type //定义结构
TForm1 = class(TForm) //TForm1属TForm类
private //私有过程
{ Private declarations }
public //共用过程
{ Public declarations }
end; //FORM1的结构
var //定义全局变量
Form1: TForm1;//FORM1是全局变量
implementation
{$R *.dfm} //编译同名DFM文件
end. //代码尾
unit Unit1;
interface
uses //引用的单元
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type //定义的类型
TForm1 = class(TForm) //从TFORM派生了一个TFORM1类
//数据的可见性
private //私有部分，只有本类可调用
{ Private declarations }
public //不用说了，公有部分
{ Public declarations }
end;
var
Form1: TForm1; //定义了一个TFORM1的对象FROM1
implementation //实现部分，将你在以上声明的东西实现一下