Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   FastReport 6: Wie kann ich in Abhgkeit eines Feldes ein Bild VISIBLE machen (https://www.delphipraxis.net/213453-fastreport-6-wie-kann-ich-abhgkeit-eines-feldes-ein-bild-visible-machen.html)

wschrabi 1. Aug 2023 13:52

FastReport 6: Wie kann ich in Abhgkeit eines Feldes ein Bild VISIBLE machen
 
Hi
Ich habe in FastReport 6 eine Liste generiert, aus einer MySQL DB. Das klappt ganz gut, doch ich möchte jetzt zu jeder Zeile dieses Reports ein ICON (immer das gleiche) sichtbar machen, wenn ein Feld namens WebURL nicht '' ist. Kann man das irgendwie im Report Sheet unter CODE machen? Oder muss man ein BLOB IMAGE FELD machen, wo das JPG ICON drin ist, und dass dann in der Liste analog zu anderen Typen laden?
Wenn ja wie? DANKE

mytbo 1. Aug 2023 14:38

AW: FastReport 6: Wie kann ich in Abhgkeit eines Feldes ein Bild VISIBLE machen
 
Zitat:

Zitat von wschrabi (Beitrag 1525117)
Kann man das irgendwie im Report Sheet unter CODE machen? Oder muss man ein BLOB IMAGE FELD machen, wo das JPG ICON drin ist, und dass dann in der Liste analog zu anderen Typen laden?
Wenn ja wie?

Eine Variante wäre: TfrxPictureView Komponente auf das Bericht-Formular. Im Ereignis OnBeforePrint in FastScript Folgendes schreiben:
Delphi-Quellcode:
procedure PictureOnBeforePrint(Sender: TfrxComponent);
begin
  if <Daten."WebURL"> <> '' then
    TfrxPictureView(Sender).FileLink := <Daten."ImageFile">;
end;
"Daten" ist der DataSet und "ImageFile" ein Feld mit dem Pfad zum Image.

Bis bald...
Thomas

Uwe Raabe 1. Aug 2023 20:50

AW: FastReport 6: Wie kann ich in Abhgkeit eines Feldes ein Bild VISIBLE machen
 
Wenn es immer das gleiche Image ist, genügt da nicht ein statisches Bild, das abhängig von dem Feldinhalt Visible gesetzt wird?

mytbo 1. Aug 2023 21:25

AW: FastReport 6: Wie kann ich in Abhgkeit eines Feldes ein Bild VISIBLE machen
 
Zitat:

Zitat von Uwe Raabe (Beitrag 1525129)
Wenn es immer das gleiche Image ist, genügt da nicht ein statisches Bild, das abhängig von dem Feldinhalt Visible gesetzt wird?

Ja, bei einem Bild reicht:
Delphi-Quellcode:
procedure PictureOnBeforePrint(Sender: TfrxComponent);
begin
  TfrxPictureView(Sender).Visible := (<Daten."WebURL"> <> '');
end;
Das Bild kann im Designer geladen werden. Ich hatte den Erstellerpost nur überflogen und eine allgemeine Variante gewählt. Danke für das aufmerksame Mitlesen. Ich verweise noch auf diesen Artikel, dessen Beispiel mit Quelltext eine gute Spielumgebung für FastReport ist.

Bis bald...
Thomas


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

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