delphi实验指导书

《delphi实验指导书》由会员分享，可在线阅读，更多相关《delphi实验指导书（13页珍藏版）》请在金锄头文库上搜索。

1、1实验一认识熟悉 delphi 编程环境目的与要求： 1、熟练掌握 delphi 编辑环境的安装和调试； 2、熟练地调整窗体和控件的大小与位置； 3、熟练掌握在窗体上放置控件的方法； 4、掌握窗体、命令按钮、文本框和标签对象的常用属性、方法和事件； 5、熟练使用属性窗口设置对象的初始属性； 内容与步骤： 1、 在窗体上创建新控件的方法1鼠标单击“控件面板”中的控件类型图标，在窗体上按下鼠标左键，然后释放左键， 新控件即创建完毕；按住键盘上的 SHIFT 键不放，鼠标单击“控件面板”中想要 的控件类型图标，在窗体上多次按下鼠标左键，然后释放左键，可重复放置多个同 一类型的新控件；单击“控件面板”

2、左上角的箭头形图标，鼠标指针还原为箭头形； 双击“控件面板”中控件类型图标，即在窗体中央位置新建一个该类型的控件； 在一已有控件上单击，选定该控件，用复制与粘贴可生成多个控件； 2、 调整窗体和控件的大小与位置 在设计状态下选择对象的方法：单击；按住 CTRL 或 SHIFT 键单击；在窗体 无控件处按下鼠标左键并拖动，形成一个虚线框，释放左键；单击窗体上无控件处， 可选择窗体对象； 调整窗体与控件大小和位置的方法：被选定的控件周围有八个选定控点，拖动任 一控点都可以调整其大小，拖动窗体对象右下方三个控点可以调整窗体的大小；单击 并拖动控件的内部区域可以在窗体上移动控件；要调整窗体在运行时显示

3、在屏幕上的 位置，可以使用属性窗口来设置其 Top 和 Left 属性值，也可以使用窗体布局窗口来调整； 使用属性窗口设置窗体和控件属性的值也可以调整其大小； 3、 窗体、命令按钮、文本框和标签控件的常用属性、事件和方法 窗体：属性 Name、Caption、Left、Top、Width、Height、Enabled、Visible、BorderStyle、 Icon、WindowState方法 Cascade、Next、Previous、Close事件 OnCreate、OnShow、 OnHide、OnCanResize 命令按钮：属性 Name、Caption、Left、Top、Widt

4、h、Height、Enabled、Visible、Default、 Cancel方法 Create、Destroy事件 OnClick 单行文本编辑框：属性 Name、Text、Left、Top、Width、Height、Enabled、Visible、 PasswordChar、ReadOnly、SelText、TabOrder方法 Create、Destroy事件 OnChange 标签: 属性 Name、Caption、Left、Top、Width、Height、Enabled、Visible、BorderStyle、 Autosize、WordWrap方法 Create、Destroy

5、事件 OnClick、OnDblClick 4、使用属性窗口设置对象的属性 首先选择要设置属性的对象，在属性窗口中会列出选定对象的大部分属性，属性名称在 左，属性值在右，设置属性值的方法会因属性的不同而不同，可以直接在属性值的位置 上输入文字或数字，或从属性值中选择，或双击属性名，属性值会在几个允许的值之间 切换； 5、 编制一程序，在屏幕上显示“欢迎您使用 Delphi” ，并输入你的名字，屏幕设计的界面如 图所示。2提示：程序中用到两个标签框和一个文本框和一个按钮，标签框显示所需的文字，文本框用 于输入你的姓名，对于两个标签框内的字号大小等属性可在标签的属性窗口中改变。点击按 钮，显示信息

6、：欢迎 XX 使用 Delphi。 （使用 showmessage 函数实现即可） 。 6、InputForm 窗体设计界面如图所示，界面上包含五个标签（Label） ，用于显示输入提示信 息，两个文本框（Edit） ，分别用于输入姓名、工龄；二个组合列表框（ComboBox） ，分别用 于选择职称和部门的输入内容；三个按钮（Button） ，分别用于清除、显示和退出程序。提示：职称包括：助教、讲师、副教授、教授。部门包括：计算机、数理、师范、机械、电 子。点击显示出输入的教师的基本信息情况。 （可以用 showmessage 函数进行拼接显示） 7、ChangeForm 界面设计如下所示，要

7、求实现只能在 edit 中输入数字，如输入其他的字符， 则给出提示信息，要求重新输入。提示：可以利用 edit 组件的 onchange 事件，对输入的字符做检查，如不是数字，则给出提示 信息。 要求重新输入。 可以用 rightstr 函数对 edit 中刚刚输入的字符截取， 进行检查如： Rightstr3（edit1.text,1） 。 8、DoubleForm 界面设计如下所示，此界面为 form1，另外新建一个 form，命名为 form2，专 门用于显示从 form1 中选择的内容。提示：从 form1 中调用 form2 显示。可以用 form2.show 或者 form2.sh

8、owmodal。 （两者的区别 在哪里？）实验二常用组件4为了提高上机效率，请按照实验要求，在上机前设计好界面，编制好所需程序，仔细检 查程序中可能出现错误的地方，并选择好调试程序的数据，给出预期的输出结果。根据各人 程度不同，可选择实验中部分内容进行练习。 目的与要求： 1、掌握建立、编辑、运行一个简单的 Delphi 应用程序的全过程； 2、掌握常用控件(文本框、标签、命令按钮)的应用； 3、掌握常用各种控件的属性、方法、事件的设置和编写； 内容与步骤： 1、 用户身份验证。接收用户输入的用户名和口令，进行验证，根据输入是否正确显示相应 的提示信息。提示：程序中可以定义两个常量用于存放 u

9、sername 和 password，以检验用户输入的正确 与否。 2、 编一个华氏温度与摄氏温度之间的转换程序，界面自己设计。 用命令按钮实现转换。即单击“转为华氏”按钮，则将所输入的数据转为华氏温度；同 样，单击“转为摄氏”按钮，则将所输入的数据转为摄氏温度。需要用到的转换公式为：F=59C+32C=95(F-32)其中 F 为华氏度，C 为摄氏度。 3、 输入二次方程 ax2+bx+c=0 的系数 a、b、c，计算并输出该二次方程的两个根 x1、x2。界 面设计请自己考虑。 要求：(1)输入 a、b、c 三个数，为了程序设计的方便可由三个文本框来实现。计算的结 果可通过文本框或 Show

10、message 过程显示。 (2)为了保证程序运行的正确，对所输入的三个数要进行检查，若发现输入的数中有非法 数据，则显示出错信息，利用 SetFocus 方法定位于出错的文本框处，以便重新输入。 4、 设置文本的对齐方式和字体样式。界面如下图所示5提示：设置字体样式和对齐方式请参考 object inspector 中的 font 属性值。 5、 编程实现如下功能。界面如下所示：要求：可以完成插入、删除、清除和追加等功能。并能完成各多选框的功能。 6、 输入 x、y、z 三个数，按从大到小的次序显示。要求： 提示：若输入的数有非数字字符，显示“不能转换成数值” ，提示再输入。当输入的三个 数

11、全部是数字字符后再转换成数值型，然后进行大小比较。 7、 编程实现如下定时器的功能。界面如下图所示：提示：注意 timer 组件的 interval 属性的设置。 8、 设计一个不带优先级的计算器。界面如下图所示:提示：用文本框 edit1 显示所输入的表达式，用 edit2 显示第二个操作数和运算结果， 用全局变量 result 保存最近一次运算结果，用全局变量 op 保存最近输入的运算符；每一个 数字字符就连接成第二个操作数， 输入新运算符后将第二个操作数按保存在 op 中的最近运算 符与上一次结果 result 进行运算，再将新运算符保存至 op，新运算结果保存至 result，然 后输

12、入新一轮的操作数与运算符。附加题附加题：电话收费标准如下：通话时间在 3 分钟以下，收费 0.50 元；3 分钟以上，则每超过 1 分钟加收 0.15 元；在 7：0019：00 之间通话者，按上述标准全价收费；在其他时间通话 者，一律按收费标准的半价收费。试计算某人在 T 时间通话 S 分钟，应收多少电话费。运行6界面如图所示。 提示： (1)时间可以通 过文本框输入，也可 通过 Time 时间函数 求得当时机器内的时 间。通话时间通过两 个时间相减得到，相 减时可以将开始、结 束的时间化成以秒为 单位再相减。可以用 时间函数。 (2)为了简化程 序，以开始通话的时间为准判定是否享受半价收费

13、的计费方法。 (3)当在通话结束文本框内输入时间后按回车，即开始计算时间和费用。 2、编制程序，计算某个学生奖学金的等级，以三门功课成绩 M1、M2、M3 为评奖依据。奖学 金评奖标准如下： 一等奖：符合下列条件之一：(1)平均分大于 95 分者(2)有两门成绩是 100 分，且第三门 功课成绩不低于 80 分者。 二等奖：符合下列条件之一：(1)平均分大于 90 分者(2)有一门成绩是 100 分，且其他功 课成绩不低于 75 分者。 三等奖：各门功课成绩不低于 70 分者。 符合条件者就高不就低，只能获得高的那一项奖学金。要求显示获奖的等级。实验三菜单设计 目的与要求： 1、掌握建立、编辑

14、、运行一个 Delphi 菜单设计的全过程； 2、掌握 mainmenu 和 popmenu 的使用； 3、掌握常用菜单控件控件的属性、方法、事件的设置和编写； 内容与步骤： 1动态创建一个字号菜单用于设置 edit1 中的字号大小。7要求：能够随字号菜单选择 edit1 中的字号。 2在 ToolBar 上添加按钮，并在按钮上显示图标的字号大小。实验四窗体设计 目的与要求： 1、掌握建立、编辑、运行一个窗体设计的全过程； 2、掌握 MDI 窗体的使用； 3、掌握对子窗体的管理； 内容与步骤： 1、 建立 MDI 应用程序。如下图所示，8提示：要求完成菜单的各项功能。实验五对话框设计 目的与要

15、求： 1、掌握建立、编辑、运行对话框设计的全过程； 2、掌握各种对话框组件的使用； 内容与步骤： 1、各种 dialog 的使用。如下图所示：9提示：完成各项按钮功能。实验六图形及多媒体应用 目的与要求： 1、掌握建立、编辑、运行图形和多媒体应用程序的全过程； 2、掌握各种图形和多媒体组件的使用； 内容与步骤： 1、 播放 windows 内部动画。界面如下图所示：10提示：选择某一种类型，在下面的 animate 组件中显示相应的动画。 2、 设计一个简单的媒体播放器。界面如下图所示：提示：只能播放.avi 格式。实验七数据库管理系统设计 目的与要求： 1、了解和熟悉数据库管理信息系统的整个

16、设计过程 2、能够应用 delphi 环境编制数据库管理系统的程序模块； 内容与步骤： 人力资源管理系统采用 delphi 7、sql server 2000 作为设计平台。数据库应用人力资源管11理系统自带数据库。 步骤： 1）在 delphi 中选择“File”/“New”/“Data Module”菜单项，新建一个数据模块， 命名为“Data1” 。 2） 在 “ADO” 组件页中选择 “TADOConnection” 组件， 添加到窗体上，“TADOConnection” 组件用来连接数据库，其他数据库组件通过它连接数据库。 3）选择“ADOConnection”组件，在“Object Inspector”窗口中，单击“ConnetcionString” 属性右侧的“”按钮，选择“Use Connection String” ，单击“Build” 。 4） 在弹出的对话框中的 “提供程序” 选项卡中设置希望连接的数据， 在此选择 “Microsoft OLE DB Provider for SQL Server” ，点击“