FastReport Band unterdrücken mit mehreren Bedingungen - Versionsgeschichte

Gevitas: /* Der Feldname des Druck-Kennzeichens */

2016-02-14T22:56:05Z

‎Der Feldname des Druck-Kennzeichens

Gevitas: /* Das Problem */

2016-02-14T22:55:39Z

‎Das Problem

Gevitas: /* Das Problem */

2016-02-14T22:47:33Z

‎Das Problem

Gevitas: /* Das Problem = */

2016-02-14T22:46:39Z

‎Das Problem =

Gevitas am 14. Februar 2016 um 22:46 Uhr

2016-02-14T22:46:26Z

Gevitas am 14. Februar 2016 um 22:37 Uhr

2016-02-14T22:37:56Z

Gevitas: Die Seite wurde neu angelegt: „== Allgemeines === Im Prinzip kann man ein Band ganz einfach im Code '''unterdrücken''', indem man eine Formel schreibt, die unter bestimmten Umständen die …“

2016-02-14T22:36:56Z

Die Seite wurde neu angelegt: „== Allgemeines === Im Prinzip kann man ein Band ganz einfach im Code '''unterdrücken''', indem man eine Formel schreibt, die unter bestimmten Umständen die …“

Neue Seite

== Allgemeines ===

Im Prinzip kann man ein Band ganz einfach im Code '''unterdrücken''', indem man eine Formel schreibt, die unter bestimmten Umständen die Eigenschaft '''Visible''' (=sichtbar) auf '''False''' (falsch, nein) stellt. Beispiel:

// Kapitel-Position ausblenden:
if <Positionen."PosNr"> = 0 then // Wenn es eine Kapitel-Position ist!
begin
DetailPositionen.Visible := False;
end;

oder kürzer:

if <Positionen."PosNr"> = 0 then // Wenn es eine Kapitel-Position ist!
DetailPositionen.Visible := False;

Im Detail-Bereich (z.B. bei Auftrags-Positionen), der ja mehrfach '''wiederholt''' wird, würde sich dieses Unsichtbar schalten aber auf '''alle folgenden''' Detail-Daten auswirken! '''Ab dem Moment''' würden die restlichen Position '''nicht mehr erscheinen'''! Also muss man im Code festlegen, was sonst passieren solle, wenn die Bedingung '''nicht''' erfüllt ist. Das könnte dann so aussehen:

// Kapitel-Position ausblenden:
if <Positionen."PosNr"> = 0 then // Wenn es eine Kapitel-Position ist!
begin
DetailPositionen.Visible := False;
end
else // Wenn es KEINE Kapitel-Position ist!
DetailPositionen.Visible := True;

Etwas schwieriger wird es, wenn es mehrere Abfragen im Code gibt, der das Visible für das Band ein- oder ausschalten. Hier wird beschrieben, wie man da am Besten vorgeht.

== Die Aufgabe ==

In einem Auftragsformular sollen Positionen (im Detail-Band) unter mehreren Bedingungen unterdrückt werden:

* Wenn es eine '''Kapitel-Überschrift''' ist (weil die weiter oben im Gruppenkopf gedruckt wird).
* Wenn das '''Druck-Kennzeichen'' der Position auf "Nicht drucken" steht.

== Das Problem ===

Mit der

if...then...else

Lösung von oben kommt man nicht weiter, weil jedes '''if''' oder '''else''' vom nächsten '''if''' oder '''else''' ja wieder aufgehoben werden würde.

Ein bessere Methode ist es, im Code zuerst einen Grundzustand herzustellen, in dem das Band erst mal sichtbar ('''Visible := True''') gemacht wird. In den folgenden Zeilen wird nun - je nach Bedingung - das Band ausgeschaltet. Das sieht dann z.B. so aus:

== Links ==

* [[FastReport Fehlermeldungen]]

* [[FastReport Seitenformat]]

* [[FastReport Daten, Tabellen und Felder]]

* [[FastReport Bands]]

* [[FastReport Objekte und Elemente eines Reports]]

* [[FastReport: Abhängige Formatierung von Feldern]]

* [[FastReport Farb-Konstanten]]

* [[FastReport HTML-Tags in Texfeldern]]

* [[FastReport Namensgebung der Datenbank-Tabellen und -Felder]]

* [[FastReport: Summen im Report bilden]]

* [[FastReport Engine: Der Report-Erzeuger]]

* [[Ladeliste/Packliste mit FastReport]]

* [[FastReport Beispiel Auftragsformular Struktur der Positionen]]

* [//youtu.be/VDTSGf4oIFA Video FastReport Teil 1: Allgemeines]

* [//youtu.be/M3keXvU3JIY Video FastReport Teil 2: Erstes Kennenlernen]

* [//youtu.be/ZEa9te2nyco Video FastReport Teil 3: Den ersten Report erstellen]

* [//youtu.be/IrpqarC0KEc Video FastReport Teil 4: Summen im Report erstellen]

* [//youtu.be/5krqu5oSuGU Video FastReport Teil 10: Vererbung, Erstellen und Verwenden eines Basis-Reports]

* [//www.fast-report.com/de/ Homepage von FastReport]

* [[Etikettendruck Allgemeines]]

* [[GEVITAS Label-Print Installation]]

* [[GEVITAS-Carnet]]

@@ Zeile 139: / Zeile 139: @@
 |}
-;* Diese Druck-Kennzeichen werden in der Praxis (und in den Standard-Formularen) '''nicht''' unterstützt!
+Die Druck-Kennzeichen mit * werden in der Praxis (und in den Standard-Formularen) '''nicht''' unterstützt!
 == Links ==

@@ Zeile 56: / Zeile 56: @@
       DetailPositionen.Visible := False;
-    // Wenn das Druck-Kennzeichen auf "nicht drucken" sthet: Ausblenden:
+    // Wenn das Druck-Kennzeichen auf "nicht drucken" steht: Ausblenden:
     if <Positionen."DruckKennzeichen_0Nicht_1Normal_2_MitBez_3NurKap_4OhneText"> = 0 then
       DetailPositionen.Visible := False;
@@ Zeile 72: / Zeile 72: @@
 stehen ja Befehle, die Objekte des Bands beeinflussen, z.B. den Rabatt ausschalten, Alternativ-Positionen kursiv darstellt usw.
-Im Grunde genommen muss dieser Code aber '''gar nicht ausgeführt werden''', wenn das Band sowieso '''unsichtbar''' ist! Deshalb kann man die weitere Abfolge der Befehle abbrechen, wenn das Band auf unsichtbar geschaltet ist. Der Code von oben sieht dann so aus:
+Im Grunde genommen muss dieser Code aber '''gar nicht ausgeführt werden''', wenn das Band sowieso '''unsichtbar''' ist! Deshalb kann man die weitere Abfolge der Befehle mit '''exit''' abbrechen, wenn das Band auf unsichtbar geschaltet ist. Der Code von oben sieht dann so aus:
   procedure DetailPositionenOnBeforePrint(Sender: TfrxComponent);
@@ Zeile 99: / Zeile 99: @@
   end;
-Der weitere Code wird nun also nicht mehr ausgeführt!
+=== Begin/End ===
 == Links ==

@@ Zeile 66: / Zeile 66: @@
 '''Eigentlich war's das schon!'''
-Aber wird können den Code noch etwas optimieren. Unter
+Aber wir können den Code noch etwas optimieren. Unter
     ...weiterer Code...

@@ Zeile 35: / Zeile 35: @@
 * Wenn das '''Druck-Kennzeichen''' der Position auf "Nicht drucken" steht.
-== Das Problem ===
+== Das Problem ==
 Mit der
@@ Zeile 101: / Zeile 101: @@
 Der weitere Code wird nun also nicht mehr ausgeführt!
 == Links ==

← Nächstältere Version		Version vom 14. Februar 2016, 22:37 Uhr
Zeile 1:		Zeile 1:
−	== Allgemeines ===	+	== Allgemeines ==

	Im Prinzip kann man ein Band ganz einfach im Code '''unterdrücken''', indem man eine Formel schreibt, die unter bestimmten Umständen die Eigenschaft '''Visible''' (=sichtbar) auf '''False''' (falsch, nein) stellt. Beispiel:		Im Prinzip kann man ein Band ganz einfach im Code '''unterdrücken''', indem man eine Formel schreibt, die unter bestimmten Umständen die Eigenschaft '''Visible''' (=sichtbar) auf '''False''' (falsch, nein) stellt. Beispiel:

@@ Zeile 33: / Zeile 33: @@
 * Wenn es eine '''Kapitel-Überschrift''' ist (weil die weiter oben im Gruppenkopf gedruckt wird).
-* Wenn das '''Druck-Kennzeichen'' der Position auf "Nicht drucken" steht.
+* Wenn das '''Druck-Kennzeichen''' der Position auf "Nicht drucken" steht.
 == Das Problem ===
@@ Zeile 45: / Zeile 45: @@
 Ein bessere Methode ist es, im Code zuerst einen Grundzustand herzustellen, in dem das Band erst mal sichtbar ('''Visible := True''') gemacht wird. In den folgenden Zeilen wird nun - je nach Bedingung - das Band ausgeschaltet. Das sieht dann z.B. so aus: