Hallo,
ich habe ein seltsames Phänomen gemeldet bekommen: Wenn aus unserer Anwendung ein Report exportiert und per EMail (via
MAPI) verschickt wird, kommt es vor, dass teilweise des eingebundene Firmenlogo völlig verwischt wird - siehe Anhang. Für den Mailversand wird der Report vorbereitet und dann der vorbereitete Report als pdf-Datei im Dateisystem abgelegt. Anschließend wird eine Mail erzeugt via JclSimpleSendMail mit der eben erzeugten Datei als Anhang. Als Code sieht das dann in etwa so aus:
Delphi-Quellcode:
var
TempPath:
string;
PDFDatei:
string;
begin
(...)
TempPath := IncludeTrailingBackslash(GetWindowsTempFolder);
// in PDF drucken
// eindeutigen Dateiname aus Vorgangsnummer erzeugen in Temp-Verzeichnis
PDFDatei := FindUnusedFileName(TempPath + '
Angebot ' + IntToStr(Angebot.AngebotNr), '
pdf', '
-');
PreparePrinting;
frxPDFExport.ShowDialog := False;
frxPDFExport.ShowProgress := False;
frxPDFExport.FileName := PDFDatei;
if frpAngebot.PrepareReport
then
frpAngebot.
Export(frxPDFExport)
else
raise Exception.Create('
Beim Vorbereiten des Reports für den Export ist ein Fehler aufgetreten.');
// Per Mail via MAPI versenden
if not JclSimpleSendMail(Angebot.Adresse.Email, '
',
Format('
Angebot %d vom %s', [Angebot.AngebotNr, FormatDateTime('
ddddd', Angebot.Datum)]), '
', PDFDatei)
then
begin
MessageDlg('
Fehler: Nachricht konnte nicht an Mail-Programm übergeben werden. Mail wurde nicht erstellt ' + #13#10 +
'
und gesendet!', mtError, [mbOK], 0);
end;
DeleteFile(PDFDatei);
end;
Das Problem tritt nur auf beim Versand via Mail, und auch nicht immer. Wird die Datei aus dem Report-Preview als PDF gespeichert, ist alles in bester Ordnung. Ebenso ist auch der Rest des Reports - Schriften usw. - soweit in Ordnung.
Hat jemand eine Erklärung, woran das liegen kann? Delphi XE3, FastReport 4.12 oder neuer (NICHT Emba-Edition), JCL/JVCL 3.47.
Viele Grüße
Udo Treichel