我有两个数据表,一个是教师的信息TEACHER,一个是学生的信息STUDENT。关系为一个教师可以对应多个学生。
我现在通过两个FORM,其中一个是FORM1有一个LABEL:输入教师号 一个EDIT,还有两个BUTTON,一个为预览,一个为打印。
当我输入教师号时且按下BUTTON时,FORM2报表打印、预览中显示的是我输入的教师号所对应的学生的信息。
请问如何实现???
我现在通过两个FORM,其中一个是FORM1有一个LABEL:输入教师号 一个EDIT,还有两个BUTTON,一个为预览,一个为打印。
当我输入教师号时且按下BUTTON时,FORM2报表打印、预览中显示的是我输入的教师号所对应的学生的信息。
请问如何实现???
解决方案 »
- 两个Timer操作听一个TList,如何保证不越界
- 初学者一函数调用问题!
- 菜鸟求一条sql语句,我有2个相同结构的表,我想把一个表的数据插入到另一个表的末尾,怎么写啊?
- 关于更新数据库的代码和名称的问题
- OleContainer怎么连接Access数据库的ole字段所存储的文件?
- MIDAS更新时出现"不能在手动或分布事务方式下创建新的连接"错误是何故?
- 大家在data modules里放些什么东西?
- delphi 中在程序中不能访问某个文件夹的问题,很奇怪
- 如何编程实现自动培植odbc数据员
- 对SimpleObjectBroker的容错能力的解释。
- 我写了个定时关机程序,在调试时可以正常运行,但我运行.exe可执行文件时,却没反应!
- 如何获取目前连接的SQL Server服务器的IP地址
在FORM2中USE FORM1然后QUICKREP1.DATASET=query1
FORM2.quickrep1.query1.close;
FORM2.quickrep1.query1.sql.clear;
FORM2.quickrep1.query1.sql.add('select *from student where'+STUDENT中的教师字段=''''+FORM1.EDIT.TEXT+'''');
FORM2.quickrep1.query1.open;
QUICKREP1.DATASET=query1
FORM2.quickrep1.query1.close;
FORM2.quickrep1.query1.sql.clear;
FORM2.quickrep1.query1.sql.add('select *from student where'+STUDENT中的教师字段=''''+FORM1.EDIT.TEXT+'''');
FORM2.quickrep1.query1.open;
query1.close;
query1.sql.clear;
query1.sql.add('select *from student where'+STUDENT中的教师字段=''''+FORM1.EDIT.TEXT+'''');
query1.open;
还有借楼住底盘用一下啊。
D7中的QREPORT控件包到哪去了?怎么没有啊,是不是我的d7有问题啊 ?
楼主,这段代码可以放在报表预览的按钮里面,你的QUERY可能不叫QUERY1,所以会报错误。改成你的QUERY名称就可以了。