简单Delphi程序设计
Delphi 7编写应用程序包括新建应用程序、设置窗体属性、添加组件、设置组件属性、添加事件、编写事件响应代码、编译运行等
1.新建应用程序
启动Delphi 7，选择【File】|【New】|【Application】菜单，新建一个应用程序。
2.设置窗体属性
单击【Object Inspector】，在对象观察器中打开【Properties】选项卡，单击Caption属性右侧，输入窗体的新标题“窗口”。
3.向窗体中添加组件
单击Standard选项卡上的Button组件，将鼠标指向窗体中的任意位置（标题栏除外），单击鼠标，即可把Button1组件放入窗体中。或者直接双击组件面板上的Button组件，也可以在窗体中添加一个Button1组件。
4.设置组件属性
选中组件，单击Object Inspector的标题栏以激活对象观察器，并选择Properties选项卡。在对象观察器中单击要设置的属性，进行属性设置。
5.添加事件
选中要添加事件的组件，激活对象观察器，并选择Event选项卡，在对象观察器中单击要添加的事件，在其右侧输入事件的响应函数名称，然后回车即可。
6.编写事件响应代码
选定要编写事件响应代码的组件，打开Event选项卡，双击要编写响应代码的事件右侧的空白部分，进入代码编辑窗
口。
procedure TForm1.Button1Click(Sender: TObject); //单击放大按钮，窗口将放大
begin
form1.Height:=form1.Height+10; //窗口高度10
form1.Width:=form1.Width+10; //窗口宽度10
end;
procedure TForm1.Button2Click(Sender: TObject); //单击缩小按钮，窗口将缩小
Begin
form1.Height:=form1.Height-10; //窗口高度减10
form1.Width:=form1.Width-10; //窗口宽度减10
end;
procedure TForm1.Button3Click(Sender: TObject); //关闭窗口
begin
close; //退出
end;
7.编译运行程序
当前位置：
论坛首页 »
自由讨论区 »
Android, Python及开发编程讨论区
»
技术讨论
发起投票
2013-11-15 14:44:59 |
赞(
操作
