FastReport Tipps und Tricks: Unterschied zwischen den Versionen

Aus GEVITAS
Wechseln zu: Navigation, Suche
(Anzahl der Datensätze)
Zeile 5: Zeile 5:
 
=== Anzahl der Datensätze ===
 
=== Anzahl der Datensätze ===
  
Manchmal hat man das Problem, dass bestimmte Bereiche unterdrücken möchte, wenn es nur einen einzigen Datensatz gibt. Beispielsweise hat man ein Mahnungsformular mit der Tabelle der fälligen Rechnungen und darunter die Gesamtsumme. Sie Gesamtsumme soll aber unterdrückt werden, wenn es nur eine angemahnte Rechnung in der Tabelle gibt. Dann kann im Objektinspektor des Bereich auf das Ereignis  
+
Manchmal hat man das Problem, dass bestimmte Bereiche unterdrückt werden sollen, wenn es nur einen einzigen Datensatz gibt. Beispielsweise hat man ein Mahnungsformular mit der Tabelle der fälligen Rechnungen und darunter die Gesamtsumme. Die Gesamtsumme soll aber unterdrückt werden, wenn es nur '''eine''' angemahnte Rechnung in der Tabelle gibt. Dann kann im Objektinspektor des Bereich auf das Ereignis  
  
 
  OnBeforePrint  
 
  OnBeforePrint  
Zeile 13: Zeile 13:
 
  procedure Child2OnBeforePrint(Sender: TfrxComponent);
 
  procedure Child2OnBeforePrint(Sender: TfrxComponent);
 
  begin
 
  begin
 +
    // Band mit der Gesamtsumme unterdrücken, wenn es nur EINE Rechnung gibt:
 
     if <Line#> = 1 then
 
     if <Line#> = 1 then
 
         Child2.Visible := False
 
         Child2.Visible := False

Version vom 14. September 2015, 16:06 Uhr

1 Allgemeines

Dieser Artikel beschreibt kleine Tipps und Tricks für das Erstellen von Reports mit FastReport, die im Alltag hilfreich sein können.

1.1 Anzahl der Datensätze

Manchmal hat man das Problem, dass bestimmte Bereiche unterdrückt werden sollen, wenn es nur einen einzigen Datensatz gibt. Beispielsweise hat man ein Mahnungsformular mit der Tabelle der fälligen Rechnungen und darunter die Gesamtsumme. Die Gesamtsumme soll aber unterdrückt werden, wenn es nur eine angemahnte Rechnung in der Tabelle gibt. Dann kann im Objektinspektor des Bereich auf das Ereignis

OnBeforePrint 

doppelklicken und diesen Code schreiben:

procedure Child2OnBeforePrint(Sender: TfrxComponent);
begin
   // Band mit der Gesamtsumme unterdrücken, wenn es nur EINE Rechnung gibt:
   if <Line#> = 1 then
       Child2.Visible := False
   else
       Child2.Visible := True;               
end;

Die System-Variable <Line#> beihaltet die Anzahl der Zeilen (Datensätze) des Detail-Bandes.

2 Links