Delphi-PRAXiS - Delphi QRDBText: Default-Wert zuweisen möglich?

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi QRDBText: Default-Wert zuweisen möglich? (https://www.delphipraxis.net/119561-qrdbtext-default-wert-zuweisen-moeglich.html)

davar

28. Aug 2008 11:06

QRDBText: Default-Wert zuweisen möglich?

Hallo,

ich habe eine TQuickRep-Komponente mit mehreren TQRDBText im Detailband. Daten kommen von einer Firebird-Datenbank.

Ist es denn möglich, einem TQRDBText einen Standardwert zuzuweisen, der angezeigt wird, wenn in einem Feld kein Wert gespeichert ist?

Bsp.: in der DB hat das Feld "USt" entweder den Inhalt "19" oder ist leer. Wenn es leer ist, soll QRDBText nicht auch leer sein, sondern den Text "USt-frei" anzeigen. Geht das, bzw. wie bekomme ich es so hin?

MfG

davar

omata

28. Aug 2008 13:29

Re: QRDBText: Default-Wert zuweisen möglich?

Benutze doch das OnPrint-Ereignis, dort kannst du den Value-Wert überschreiben.

marabu

28. Aug 2008 16:57

Re: QRDBText: Default-Wert zuweisen möglich?

Hallo,

noch eine Alternative wäre eine modifizierte Query für den Report:

SQL-Code:

SELECT ... COALESCE(UST, 'USt-frei') AS UST ... FROM ...

Freundliche Grüße

Alle Zeitangaben in WEZ +1. Es ist jetzt 15:15 Uhr.