![]() |
AW: TCharts in der Druckvorschau
Keine Ahnung, wie das heißt, aber schön sieht es nicht aus, oder ?
|
AW: TCharts in der Druckvorschau
.. musst Du zwingend ein jpg nehmen um darauf zu zeichnen.
Die Artefakte könnten durch die jpg Kompression entstanden sein. Bei der eher monochromatischen Zeichnung sollten die Resultate mit einem bitmap (bmp) besser aussehen. Grüße Klaus |
AW: TCharts in der Druckvorschau
Die Grafik soll nicht monochrom bleiben, das war nur ein erster Versuch. Eigentlich sollen mehrere Series in unterschiedlichen Farben und Diagrammhintergrund dargestellt werden. Dazu kommt die Legende etc.
Kann man die Kompression irgendwie runter setzen, um die Artefakte zu vermeiden ? |
AW: TCharts in der Druckvorschau
kann man, aber nimm doch lieber gleich ein Bitmap ...
|
AW: TCharts in der Druckvorschau
Liste der Anhänge anzeigen (Anzahl: 1)
Anbei nur mal ein Beispiel mit TChart und Quickreport.
Gruß |
AW: TCharts in der Druckvorschau
@Bummi,an welcher Stelle sollte ich also ein Bitmap nehmen ? Ich befürchte nur, dass sich ein Bitmap nicht so einfach drehen lässt mit der Transform-Methode.
Könnte es trotzdem so klappen ? Bin im Moment nicht auf Arbeit und kann nicht testen.
Code:
@Darlo, Danke für dein Beispiel. Nur muss ich mich entscheiden, entweder die Charts zu drehen, um das Blatt mit den Kopfzeilen, Fusszeilen,etc. im Hochformat drucken zu können oder eben den Text in den Kopfzeilen, Fusszeilen etc. drehen, damit ich das Blatt im Querformat habe und die Charts nicht drehen muss. Ich hoffe, du verstehst, wie ich das meine. Meine test.pdf im Anhang von #19 zeigt ja, dass ich u.a auch einen Rahmen benötige, verschiedene Textzeilen. Und da empfinde ich es als leichter zu realisieren, wenn man dann nur die Charts dreht. Solange alles auf einem Blatt gleich ausgerichtet ist, gibt es keine Probleme, nur wenn bspw. der Text ungedreht, die Grafik aber um 270 Grad gedreht werden muss.
FJpeg: TBitmap;
form1.Chart1.CopyToClipboardBitmap; clip:=Clipboard; form16.QRImage1.Picture.bitmap.LoadFromClipboardFormat(CF_Bitmap,clip.GetAsHandle(CF_Bitmap),0); FJpeg:=TBitmap.Create; FJpeg.Assign(form16.QRImage1.Picture.bitmap); FJpeg.Transform(TJpegTransform(jt_ROT_270)); form16.QRImage1.Picture.Assign(FJpeg); FJpeg.Free; clip.Clear; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 16:58 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