光
光山
Unregistered / Unconfirmed
GUEST, unregistred user!
在用QReport控件打印报表时，将会把当前数据集（Query1）的全部记录打印出来
，现请教如何只把当前一条记录打印出来？
，现请教如何只把当前一条记录打印出来？
您正在使用一款已经过时的浏览器！部分功能不能正常使用。
请尝试升级或使用 其他浏览器。
请尝试升级或使用 其他浏览器。
Z
zwma
Unregistered / Unconfirmed
GUEST, unregistred user!
直接在QReport上放qrlabel，qrtext等
光
光山
Unregistered / Unconfirmed
GUEST, unregistred user!
请教zwma:我找遍所有控件,也找不到你说的qrtext,再说即使找到qrtext,
如何与QUERY1部件相连?请继续指点迷津.
如何与QUERY1部件相连?请继续指点迷津.
Z
zwma
Unregistered / Unconfirmed
GUEST, unregistred user!
对不起,上次的QRTEXT错了,应为QRDBTEXT
另注意不要用任何qrband
直接写
另注意不要用任何qrband
直接写
P
philips
Unregistered / Unconfirmed
GUEST, unregistred user!
设置query使之仅包含所要的那条记录！
Y
yang xuewen
Unregistered / Unconfirmed
GUEST, unregistred user!
对该问题的解决办法我也有迫切需要，zwma的回答中没有涉及如何定位到当前记录，
philips的回答中是指特定记录，而当前记录是会变化的。有哪位高手请速指点，万
分感谢！
philips的回答中是指特定记录，而当前记录是会变化的。有哪位高手请速指点，万
分感谢！
D
DJ.
Unregistered / Unconfirmed
GUEST, unregistred user!
我用ReportBuilder,
只要设置TppDBPipeline的Rangebegin
为rbCurrentRecord,RangEnd为reCurrentRecord即可。
只要设置TppDBPipeline的Rangebegin
为rbCurrentRecord,RangEnd为reCurrentRecord即可。
Y
yang xuewen
Unregistered / Unconfirmed
GUEST, unregistred user!
我现在用的是Delphi5，如何找到ReportBuilder，请详细说明，谢！
J
jswqg
Unregistered / Unconfirmed
GUEST, unregistred user!
用query先过滤，选出当前纪录，再打印即可。
调用与报表连接query的sql.动态添加查询除当前纪录ok!
调用与报表连接query的sql.动态添加查询除当前纪录ok!
N
nnhww
Unregistered / Unconfirmed
GUEST, unregistred user!
QUERY1.FILTERED:=TRUE;
在QUERY1的ONFILTEREDRECORD事件中写
IF QUERY1.FIELDBYNAME('BH').ASSTRING = '1002' then
ACCEPT:=TRUE
else
ACCEPT:=FALSE;
在QUERY1的ONFILTEREDRECORD事件中写
IF QUERY1.FIELDBYNAME('BH').ASSTRING = '1002' then
ACCEPT:=TRUE
else
ACCEPT:=FALSE;
P
philips
Unregistered / Unconfirmed
GUEST, unregistred user!
如果你经常这么做，你可以：
因为是一条记录，所以不必放detailband, 而该用titleband, 将其拉满至一页。
在报表 titleband 上放置好 qrptlabel,通过程序，设置其值（当前记录的值，
直接取即是，如: query1.fieldbyname('name').asString）。
因为是一条记录，所以不必放detailband, 而该用titleband, 将其拉满至一页。
在报表 titleband 上放置好 qrptlabel,通过程序，设置其值（当前记录的值，
直接取即是，如: query1.fieldbyname('name').asString）。
S
songxiao
Unregistered / Unconfirmed
GUEST, unregistred user!
假设 1.Quickreport1 的DATASET 为QUERY1；
2.Key为能决定当前记录的关键詞
Procedure TForm1.Button1Click(Sender:TObject);
begin
Key:=?
with TQuickreport1.Create(self)do
try
query1.ParabyName('关键词').as所需类型:=Key;
query1.open;
Print;
finally
Free;
end;
2.Key为能决定当前记录的关键詞
Procedure TForm1.Button1Click(Sender:TObject);
begin
Key:=?
with TQuickreport1.Create(self)do
try
query1.ParabyName('关键词').as所需类型:=Key;
query1.open;
Print;
finally
Free;
end;
W
wingirl
Unregistered / Unconfirmed
GUEST, unregistred user!
philips说的没错，我也经常用这种方法，很方便的。
X
xinyt
Unregistered / Unconfirmed
GUEST, unregistred user!
很简单，QuickRep1.dataset=当前数据表。
M
maoke
Unregistered / Unconfirmed
GUEST, unregistred user!
选中要打印的记录，可以传相应的关键值给QuickRep1相应的QUERY1，进行定位。
L
liuly
Unregistered / Unconfirmed
GUEST, unregistred user!
多人接受答案了。