如何使报表预览显示出来query的动态查询结果?

Juddy 2000-08-11 11:00:00
我先让用户根据条件查询,然后产生一个查询结果的报表。我已经设了QuickReport的Dataset=query1,QRDBText的也设了,现在结果数据已经传过来了,但在程序中为何预览时总看不到呢?代码如下:
Button1.click():
query1.add('select * from article');
query1.open;
Button2:
QuickReport.dataset:=query1;
QRDBText.dataset:=query1;
QRDBText.datafield:=query1.fields[0].asstring;
QuickReport.preview;
急切盼望高手的回答!

...全文
196 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
pjy 2000-08-12
  • 打赏
  • 举报
回复
关注!
torent 2000-08-12
  • 打赏
  • 举报
回复

QRDBText.datafield:=query1.fields[0].asstring;
改成
QRDBText.datafield:=query1.fields[0].FieldName;
试一试。
lotto 2000-08-12
  • 打赏
  • 举报
回复
如果你将query1放置在与报表不同的单元中,如放在与button1同一个单元中,假设这个单元叫unit_od,其表单叫form_od,要想在表单中引用这个单元中的query1,就必须在报表单元的implementation下面添加:
uses unit_od
然后将设置quickreport的数据来源:
quickreport.dataset:=form_od.query1其它qrdbtext的设置于之相同。
如还有问题请mail至:lotto@njjxrj.com
luxy 2000-08-12
  • 打赏
  • 举报
回复
加上
query1.active:=true;
WJS888 2000-08-12
  • 打赏
  • 举报
回复
listen

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧