2

我有一个(重复的)细节带,并附有一个子带:

在此处输入图像描述

我想让子带隐藏,直到它打印最后一个细节带。从概念上讲,它类似于:

在此处输入图像描述

EOF?

我的第一个想法是检查.EOF数据集的属性;你可以数据行上,但它仍然是 EOF:

procedure TForm6.DetailBand1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean);
begin
    // Print our child band if we're the last detail band:
    ChildBand1.Enabled := QuickRep1.DataSet.EOF;
end;

但事实.EOF并非如此。

也许BeforePrint发生在内部.Next发生之前,所以我尝试AfterPrint

procedure TForm6.DetailBand1AfterPrint(Sender: TQRCustomBand; BandPrinted: Boolean);
begin
    // Print our child band if we're the last detail band:
    ChildBand1.Enabled := QuickRep1.DataSet.EOF;
end;

.EOF从未设置。

如何检测到最后一个细节带正在打印?

于是问题就变成了:

我如何检测到最后一个 rbDetail 带正在打印?

4

1 回答 1

0

我有同样的问题,我通过将DetailBand1.FooterBand属性设置为ChildBand1.

这导致在显示所有重复项ChildBand1之后显示一次。DetailBand1

于 2021-08-09T11:02:29.180 回答