程序设计》《Delphi程序设计》实验指导书
杨长春刘俊石林编写
江苏工业
计算机科学与工程系
实验一,实验一,Delphi集成化开发环境与ObjectOpascal语言
一,实验目的1.掌握Delphi程序设计的上机步骤.2.了解Delphi集成化开发环境.3.认识应用程序框架.4.掌握ObjectOpascal语言程序设计.二,实验要求1.做好实验预习,掌握并熟悉本实验涉及到的内容2.写出实验报告,内容要求:(1)实验目的(2)实验内容,实验源代码写出关键的部分,一定要写出实验中出现的错误,以及解决错误的方法.(3)出错信息及处理方法.(4)实验结果,包括实验处理结果和设计心得.三,实验环境操作系统:Windows2000Pro+SP4,应用系统:Delphi7.0企业版.四,实验内容1.练习使用Delphi可视化设计方法步骤(1)启动程序,新建工程.(2)添加组件(3)设置组件属性(4)编写代码(5)保存工程(6)运行工程2.ObjectPascal数据类型的使用运行教材第二章中的实例,回答:ObjectPascal提供了哪几种运算符数据类型,提供了那些语句?3.简单Windows程序
设计任选题目1至题目6中完成4个.题目1:输入圆的半径,计算并输出圆的内接正方形,外切正方形面积.
题目2:在编辑框中输入三种商品的单价,购买数量,计算并输出所用的总金额.
题目3:单位发工资.某职工应发工资X元,试求各种票额钞票总张数最少的付款
方案.
题目4:编写程序,任意输入一个整数,判断整数的奇偶性.
题目5:键盘输入a,b,c的值,判断他们能否构称三角形的三个边.如果能够构成一个三角形,则计算三角形的面积.
题目6:设计程序,s=1+(1+2)+(1+2+3)+(1+2+3+4)+……+(1+2+……+n)的值.求
实验二,常用组件,高级数据类型(必做)实验二,常用组件,高级数据类型(必做)
一,实验目的掌握按钮类,文本类,
列表类,组合框组件,菜单,工具栏,对话框,网格组件,系统组件,PageControl组件的使用掌握高级数据类型的编程二,实验要求1.做好实验预习,掌握并熟悉本实验涉及到的内容2.写出实验报告,内容要求:(1)实验目的(2)实验内容,实验源代码写出关键的部分,一定要写出实验中出现的错误,以及解决错误的方法.(3)出错信息及处理方法.(4)实验结果,包括实验处理结果和设计心得.三,实验环境操作系统:Windows2000Pro+SP4,应用系统:
Delphi7.0企业版.四,实验内容所有同学可以从题目1~题目10中任选其中2个完成,另外题目2必须完成.题目1:编写一个简单程序:可输入学生的,和自述并可以改变字体的设置.
题目2:使用高级类型创建一链表,实现学生基本信息管理.可以插入,修改,删除和查询学生记录信息.提示:结点定义如下typePlink=^NodeNode=RecordStuID:String[10];//StuName:String[12];//
StuSex:String[2];//男女StuAge:Byte;//年龄StuBirth:String[10];//出生日期,格式为yyyy-mm-ddStuDept:String[30];//所在系部StuClass:String[30];//所在班级Next:Plink;End;题目3:单选按钮与复选按钮的使用.编写如图界面,选择颜色可改变文本颜色和背景颜色.
题目4:利用循环结构的三种语句,制作一个九九乘法表.
题目5:Hanoi塔问题:传说印度教的主神梵天创造世界时,印度北部佛教胜地贝拿勒斯圣庙里,安放了一块黄铜板,板上插着三根针,在其中一根针上自下而上放着由大到小的64个金盘.这就是所谓的梵塔(Hanoi).梵天要僧侣坚定不移地按下面规则把64个盘子移到另一根针上:(1)一个只能移一个盘子.(2)盘子只许在三根针上存放.(3)永远不许大盘压小盘.梵天称,当把他创造世界时所安放的64个盘子全部移到另一根针上之时,就是世界毁灭之日.请编制
程序解决该
问题.程序运行效果,如图所示.
题目6:"完备数"是指一个数恰好等于它的因子之和,如6的因子为1,2,3,而6=1+2+3,因而6就是完数.编制程序,找出1-1000之间的的全部"完备数".
题目7:验证"歌德巴赫猜想".1742年6月,德国数学家歌德巴赫(C.Goldbah1690-1764)在给彼德堡德大数学家欧拉德信中提出一个问题,任何大于6的偶数均可以表示为两个素数之和吗?欧拉复信道:"任何大于6的偶数均可以表示为两个素数之和,这一猜想我还不能证明,但我确信无疑地认为这是完全正确的定理."这就是至今尚未被证明的歌德巴赫猜想.题目8:利用二维数组实现输出幻方阵.幻方阵也称方阵,是指由自然数1~n2(n为奇数)构成的方阵,其各行,各列以及对角线元素之和均为相等.
题目9:利用集合类型实现筛法求素数题目10:利用二维数组实现输出易一8╳8的方阵,对角线和反对角线元素为8,其余元素为1.
实验三,键盘鼠标文件编程,实验三,键盘鼠标文件编程,Windows高级编程
一,实验目的1.掌握键盘编程的常用事件2.掌握鼠标编程的
常用事件3.掌握文本文件的常用操作过程和函数4.掌握有类型文件的常用操作过程和函数5.了解无类型文件的操作.6.掌握Delphi中的异常保护机制7.掌握动态链接库
工作原理8.掌握如何创建一个动态链接库.9.掌握如何调用一个动态链接库.10.了解ActiveX编程的原理.11.了解创建简单的ActiveX组件的方法.12.了解添加第三方OCX的方法.二,实验要求1.做好实验预习,掌握并熟悉本实验涉及到的内容