《教务管理系统应用小程序开发报告》由会员分享，可在线阅读，更多相关《教务管理系统应用小程序开发报告（4页珍藏版）》请在金锄头文库上搜索。
1、 教务管理系统应用小程序开发报告一需求分析教务管理系统要实现的功能：1. 能够查询学生的课程表2. 能够查询教师的课程表3. 以管理员权限对数据库进行修改和维护二数据库设计1.E-R 图2.数据字典表：名称：student 别名：学生表包含的列：学生学号（主键）+学生姓名名称：course 别名：课程表包含的列：课程号（主键）+课程名名称：teacher 别名：教师表包含的列：教师工号（主键）+教师姓名名称：classroom 别名：教室表包含的列：教室编号（主键）+教室名 列：名称：coursetime 别名：时间表包含的列：上课时间编号（主键）+具体时间名称：cs 别名：学生选课表包含的列
2、：课程编号+学生学号名称：ccr 别名：课程-教室表包含的列：课程编号+教室编号 名称：ct 别名：教师任课表包含的列：课程编号+教师编号 名称：cct 别名：课程上课时间表包含的列：上课时间编号+具体时间名称：sno 类型：字符 长度：10有关的表：学生表，学生选课表 说明：本系统的学生学号名称：sname 类型：字符 长度：20有关的表：学生表 说明：本系统的学生姓名名称：cno 类型：字符 长度：10有关的表：学生表，课程表，教室表，教师表，时间表，学生选课表，课程-教室表，教师任课表，课程上课时间表 说明：本系统的课程编号名称：cname 类型：字符 长度：20有关的表：课程表 说明：
3、本系统的课程名名称：tno 类型：字符 长度：10有关的表：教师表，教师任课表 说明：本系统的教师工号名称：tname 类型：字符 长度：20有关的表：教师表 说明：本系统的教师姓名三源码查询功能：with adoquery1 dobeginclose;sql.Clear;sql.Add(select student.*,Course.Cname,teacher.tname,classroom.crname,coursetime.ctname);sql.Add(from Student,CS,Course,ct,teacher,ccr,classroom,cct,coursetime);sql
4、.Add(where student.sno=cs.sno and o=o);sql.Add(and teacher.tno=ct.tno and o=o);sql.Add(and classroom.crno=ccr.crno and o=o);sql.Add(and o=o and cct.ctno=coursetime.ctno);sql.Add(and student.sname=:A);parameters.ParamByName(A).Value:=edit1.Text;open;end;插入功能：with adoquery1 dobegintryclose;名称：crno 类型：
5、字符 长度：10有关的表：教室表，课程-教室表 说明：本系统的教室编号名称：crname 类型：字符 长度：20有关的表：教室表 说明：本系统的教室名名称：ctno 类型：字符 长度：10有关的表：时间表，课程上课时间表 说明：本系统的时间编号名称：ctname 类型：字符 长度：20有关的表：时间表 说明：本系统的具体时间 sql.Clear;sql.Add(insert into stu(sno,sname,sage,sex);sql.Add(values(:A,:B,:C,:D);parameters.ParamByName(A).Value:=strtoint(edit1.Text);
6、parameters.ParamByName(B).Value:=edit2.Text;parameters.ParamByName(C).Value:=strtoint(edit3.Text);parameters.ParamByName(D).Value:=edit4.Text;execsql;excepton ex:EConvertError doMessageDlg(请仔细检查输入的数据 !,mtWarning,mbYes,0);end;Edit1.Text:=;Edit2.Text:=;Edit3.Text:=;Edit4.Text:=;end;删除功能：with adoquery1
7、 dobegintryclose;sql.Clear;sql.Add(delete from stu);sql.Add(where stu.sno=:A);parameters.ParamByName(A).Value:=strtoint(edit5.Text);execsql;excepton ex:EConvertError doMessageDlg(请仔细检查输入的数据 !,mtWarning,mbYes,0);end;Edit5.Text:=;end;代码差不多，只是有点小部分有改动。四小结这次的小程序是我和队友叶宗会用 deiphi7 写的，面对新的工具，新的语言，一开始害怕过，不过认真看了几天书后明白 delphi 的语法其实和 C+和 JAVA 的差不多，了解一定语法后就可以去学着怎么用那些组件了，了解后程序很快就做好了！
