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

[wschrabi]

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]

Zitat von wschrabi:

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]

Wenn es immer das gleiche Image ist, genügt da nicht ein statisches Bild, das abhängig von dem Feldinhalt Visible gesetzt wird?

[mytbo]

Zitat von Uwe Raabe:

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