FastReport Zwischensumme

[Brainstalker]

So für die erste Seite hab ich einfach das hier genommen:

Delphi-Quellcode:

ColumnHeader1.Visible := (Get('Page#') > 1);

Damit wird der Header nur auf allen Seiten > 1 verwendet.

Jetzt wollte ich für den Footer das hier benutzen:

Delphi-Quellcode:

ColumnFooter1.Visible := (Get('Page#') < Get('TotalPages#'))

Aber TotalPages# ist immer 0. Warum?


Vielleicht findet haentschman ja ne andere Möglichkeit. Schonmal danke fürs anschauen.

[Union]

Totalpages kannst Du nur bei DoublePass verwenden im 2. Durchlauf der Engine.

[haentschman]

Zitat:

Vielleicht findet haentschman ja ne andere Möglichkeit. Schonmal danke fürs anschauen.

... ich kämpfe mit dem Übertrag über dem Header...

[Brainstalker]

Falls du noch was finden solltest, wärs ok. Ansonsten musst du dir nicht unbedingt die Mühe machen. Ich hab jetzt einfach DoublePass angemacht und jetzt funktioniert es mit dem Code von oben.

[haentschman]

probier mal das... ich kann ohne Daten leider nix sehen :zwinker:

[Brainstalker]

Hey cool, habs jetzt hinbekommen. Habs mir nur so abgeändert, das immer das ganze Band Visible:=false; ist.

Delphi-Quellcode:

procedure ColumnHeader1OnBeforePrint(Sender: TfrxComponent);
begin
  ColumnHeader1.Visible := (Get('Page#') > 1);                                   
end;

procedure ColumnFooter1OnBeforePrint(Sender: TfrxComponent);
begin
  Set('SubSum', tSum);
  ColumnFooter1.Visible := not Masterdata1.Dataset.Eof;                                                            
end;

So funktioniert es jetzt auch ohne DoublePass.