7实验七 文件管理.docVIP

  • 6
  • 0
  • 约小于1千字
  • 约 4页
  • 2018-05-25 发布于河南
  • 举报
7实验七 文件管理

实验七 delphi的文件管理实验 实验目的: 熟悉记录文件的声明。 熟悉Delphi文件的操作方法和步骤。 实验内容及要求: 设计一个窗体,包括5个选项卡,如下图1所示。功能如下: 图1 窗体界面 1、录入 输入学生成绩后,单击“录入”,将输入的信息录入到一个顺序文件(stu.dat)中。单击“新记录”,清空该选项卡上的输入信息,光标自动定位到学号编辑框中,接收下一个学生数据的输入。如图1。 2.学生信息 单击该选项卡时,从stu.dat中读入全部的学生成绩数据,显示在列表框中。单击“保存不及格者”,将其中需要补考的学生数据存入一个新文件(stu0.dat)中。单击“保存获得奖学金者”,将其中获得奖学金的学生的数据存入一个新文件(stu1.dat)中。评奖学金的条件是:每门课程成绩均在85分以上或者三门课程总分在270分以上。如图2。 图2 学生信息 3、补考学生信息 单击该选项卡时,从stu0.dat中读入全部的补考学生成绩数据,显示在列表框中。如图3。 图3 补考学生信息 4、单科补考学生信息 从stu0.dat中读入全部的补考学生成绩数据,根据单选按钮的选择,分别在列表框中显示单科需要补考的学生名单。如图4。 图4 单科补考学生信息 5、获得奖学金学生信息 单击该选项卡时,从stu1.dat中读入全部的获得奖学金的学生成绩数据,显示在列表框中。如图5。 图5 获得奖学金学生信息 实验准备: 1、读写文件的步骤: (1)文件变量的声明 (2)建立文件变量和文件的联系:assignfile (3)打开文件:reset,rewrite (4)读写文件:read,write (5)关闭文件变量和文件的联系:closefile 2、注意读写是逐行进行的,使用循环的结构,用eof(f) 判断文件是否结束。 3、记录类型的定义和记录文件的定义。 四、程序代码清单 五、实验过程及记录: 输入程序代码,调试并按测试数据进行测试,记录实验运行错误。 格式如下: 第1个错误: 提示: 原因: 更正: 六、实验总结: 1

文档评论(0)

1亿VIP精品文档

相关文档