小弟求学心切求解析一段Delphi代码,小弟初学Delphi什么都不懂麻烦帮我一句一句的解析,多谢了
unit Unit1;
interface
uses
windows,Messages,SysUtils,Variants,Classes,Graphics,Controls, Forms, Dialogs;
type
TForm1=class(TForm)
Procedure FormCreate(Sender:Tobject);
Private
{Private declarations}
public
{Pbulic declarations}
end;
var
Form1; TForm1;
Implementation
{$R*.dfm}
procedure TForm1.FormCreate(Sender; TObject);
begin
Self.Caption:=’主窗体’;
End;
End;
unit Unit1;
interface
uses
windows,Messages,SysUtils,Variants,Classes,Graphics,Controls, Forms, Dialogs;
type
TForm1=class(TForm)
Procedure FormCreate(Sender:Tobject);
Private
{Private declarations}
public
{Pbulic declarations}
end;
var
Form1; TForm1;
Implementation
{$R*.dfm}
procedure TForm1.FormCreate(Sender; TObject);
begin
Self.Caption:=’主窗体’;
End;
End;
解决方案 »
- 将 form 的 parent 设成 panel 后
- 如何在编辑dataset当前行的数据时,找到需要的其他行,并更改他的数据
- 请教数据恢复的高手,我想知道delete以后的数据怎么恢复!
- 新作的网站,大家给点意见吧
- 繁體系統,真是煩。來幫忙~
- 寻找一个提供CheckBox的树型控件
- 最好是有关开发控件的网址!!!!!!!!!!!!!
- 请问各位大侠,数据库活动连接串TADOConnection如何传入COM服务器中。
- 如何在程序中实现数据表的pack,就是删除以前没用的记录号
- 有人知道吗?关于DEPHI的问题:1.十六进制转十进制,2.幂函数的问题(见内)
- 怎么dbgrid运行时候不能用鼠标中键控制右边的导航条呢?
- 怎样捕获ListView中鼠标点击的坐标!??
我来解释吧
---------------
unit Unit1;
//单元名字
interface
//接口开始
uses
windows,Messages,SysUtils,Variants,Classes,Graphics,Controls, Forms, Dialogs;
//主要用到的单元,相当于头文件include
type
TForm1=class(TForm)
Procedure FormCreate(Sender:Tobject);
Private
{Private declarations}
public
{Pbulic declarations}
end;
//上面定义窗体类,包括窗体中的组件和操作等
var
Form1; TForm1;
Implementation
//主要操作开始
{$R*.dfm}
procedure TForm1.FormCreate(Sender; TObject);
//一个事件,在窗体生成是触发
begin
Self.Caption:=’主窗体’;
//功能是改变窗体名称
End;
End;
//完毕
什么都清楚了