Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi QuickReport-Druckprobleme mit best. Werten einer Datenbank (https://www.delphipraxis.net/11893-quickreport-druckprobleme-mit-best-werten-einer-datenbank.html)

1tb30309 16. Nov 2003 13:08


QuickReport-Druckprobleme mit best. Werten einer Datenbank
 
Moin,

ich versuche mit QuickReport Datensätze einer .mdb-Tabelle zu drucken.
Klappt auch soweit ganz gut. :-D
Allerdings stehen in einen Feldern der Datenbank nur "True" oder "False".
Beim anzeigen der Tabelle benutze ich dazu ein DBCheckbox.
aber beim Drucke sieht es echt ärmlich aus, wenn da dann aufm Papier steht TRUE oder FALSE :gruebel:
Lange Rede kurzer Sinn:
wie kriege ich die anzeige auf dem Papier so hin, dass dann da steht JA bzw NEIN

Datenbank wird per ADO geöffnet Anzeige in DBedit felder

THANKS a Lot for your help

Johannes :party:

mikhal 16. Nov 2003 13:58

Re: QuickReport-Druckprobleme mit best. Werten einer Datenba
 
Benutze für die Ausgabe des entsprechenden Feldes ein QRLabel. Im Ereignis BeforePrint deines TQuickRep fügst du dann den Programmcode zum Schreiben von Ja und Nein ein:

Delphi-Quellcode:
if AdoQuery1.FindField('<Feldname>').AsBoolean then
  QRLabel1.Caption := 'Ja'
else
  QRLabel1.Caption := 'Nein';
Grüße
Mikhal

Matt 16. Nov 2003 14:02

Re: QuickReport-Druckprobleme mit best. Werten einer Datenba
 
Indem Du eine SQL Abfrage erstellst und das Feld mit True und False abfragst und entsprechend ersetzt!

SELECT Feld1, Feld2, IIf([Feld3]="True","Ja","Nein") AS [Check] FROM Tabelle1

1tb30309 17. Nov 2003 12:54

Re: QuickReport-Druckprobleme mit best. Werten einer Datenba
 
Hi Mikhal

es funzt optimal :hello: :hello:

man darf halt seine alten Pascal-Kenntnisse nicht vergessen if ... then ... Befehl :oops:


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

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz