Bild auf Report

[Bine]

Hi,

folgendes Problem habe ich:

Also viele Kunden wollen auf ihren Ausdrücken ihr Firmenlogo integriert haben, jetzt meine Frage wie kann ich

1) das BILD im nachinein einfügen - zur Laufzeit

2) Fehlermeldungen abfangen, falls das Bild nicht öffnen kann oder die Auflösung zu groß ist!!

Danke für jede Hilfe!!

BINE :_)

[Bine]

Gibt es keine Lösung

[Olav Merkle]

Hallo Bine,

zu 1. gibt es verschiedene Möglichkeiten. Du kannst eine QRImage-Komponente in einen Abschnitt (Title, Detail, ..) einfügen. Bevor der Abschnitt angezeigt wird (Ereignis BeforePrint) kann das Bild z.B. mit QRImage1.Picture.LoadFromFile('bildname') geladen werden.
<br>
Bsp. mit Anzeige und Ausrichtung von Bild in Seitenkopf:<br>
procedure TfrmFormLetter.PageHeaderBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);<br>
begin<br>
try<br>
QRImage1.Picture.LoadFromFile('c:\temp\test.jpg'); <br>
QRImage1.Left := PageHeaderBand1.Width-QRImage1.Picture.Width-10;<br>
except<br>
// falls kein Bild vorhanden oder anderer Fehler auftritt<br>
end;<br>
end;<br>
Falls das Bild zu gross ist, kann man über Width und Height die Grösse bestimmen (AutoSize := True), die QRImage1.AutoSize := False und QRImage1.Stretch := True setzen, und danach über QRImage1.Width und Height das Bild skalieren.<br>
zu 2. siehe oben : Try Except <br>

Gruss<br>
Olav<br&gt

[Bine]

Danke, werde das mal ausprobieren,..
BINE :_

[Bine]

Also bin endlich dazu gekommen das Bild zu importieren!

Frage: Damit der Benutzter nicht jedesmal das Logo wählen muß, muß(kann) ich die Datei in eine ini schreiben oder?

Kannst du mir sagen wie das geht mit den ini speichern??
Wie lade ich das Bild dann?

BINE :_

[Bine]

Hat sich erledigt funktioniert schon <b>PERFEKT!</b> DANKE!!!!