设计
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.编译运行程序
图1-6 例程运行界面
1.4 Delphi上机步骤
1.启动程序 2.添加组件 在窗体设计器中添加如图1-7所示的各组件。
3.设置组件属性 4.编写代码 组件属性设置完成后,编写如下代码:
图1-7 窗体布局图
? procedure TForm1.Edit1Change(Sender: TObject); //编辑 框1中的内容改变时的事件 ? var ? stringlength:integer; //定义整型变量,记录编辑框1中字符
的个数
? begin ? stringlength:=edit1.GetTextLen; //得到编辑框1中字符个数 ? edit2.Text:=inttostr(stringlength); //编辑框2显示编辑框1中
字符个数
? end; ? procedure TForm1.Button1Click(Sender: TObject);
关闭窗口
//
? begin ? close; ? end;
5.保存工程 保存工程分为保存单元文件和保存项目文件 两步。 第一步是保存单元文件,单击工具栏上的 Save按钮,将打开Save Unit1 As窗口,默认 的单元文件名是“Unit1.pas”,以“.pas”为 扩展名,单元文件名根据需要可以另取 。 第二步是保存项目文件,单击工具栏上Save Project1 As按钮,默认的项目文件名是 “Project1.dpr”,工程文件名根据需要可以另 取以“.dpr”为扩展名
6.运行工程 保存工程结束后即可运行工程
图1-10 工程运行界面图
小结
在本章中,主要介绍了Delphi的产生和发 展,Delphi的特点,使用Delphi进行程序设计 的一些基础知识。本章的重点是Delphi的开 发环境和开发方法,通过实例介绍了Delphi 的程序设计和上机操作的一般步骤。
第2章 Delphi语法基础
2.1 保留字与标识符
2.1.1 标识符 标识符是Object Pasca
l语言中各种成分 的名称,这些成分包括变量(Var)、常量 ( Const ) 、 类 型 ( Type ) 、 过 程 ( Procedure ) 、 函 数 ( Function ) 、 方 法 (Method)、单元(Unit)等。
标识符可以分为三类:标准标识符、自定 义标识符和限定标识符。 1.标准标识符 ? (1)标准常量,如False、Maxint、True等; ? (2)标准类型,如Boolean、Char、Real等; ? (3)标准函数,如Sin、Cos、Abs、Arctan 等; ? (4)标准过程,如Dispose、Get、New、Pack、 Put等; ? (5)标准文件,如Input、Output等。
2.自定义标识符 程序员根据程序设计的需要,自己定义的 常量、变量、类型、函数、过程等所取的名 字。