Entwickler-Ecke
Delphi Language (Object-Pascal) / CLX - JPG ausdruck unter Delphi 2009. Problem?
LitleBigMan - Do 02.07.09 17:43
Titel: JPG ausdruck unter Delphi 2009. Problem?
Ich versuche über Printer.canvas eine Jpg Datei auszudrucken. Und habe damit kein erfolg.
Entweder stelle ich mich zu doof an oder es funktioniert nicht...
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
| procedure Ausgabe_JPG(X1,Y1,X2,Y2:Integer;Datei:String) Var Bild:tpicture; Begin bild:=tpicture.Create; bild.Graphic:=tjpegimage.Create; tjpegimage(bild.Graphic).LoadFromFile(Datei); printer.Canvas.Draw(10,10,bild.Graphic); .. end; |
In Datei steht da richtige drin und bei ////xxx kommt eine zugriffverletzung un das war's dann.
Vorher wir der Druck begonnen und auf 1/10 mm umgestellt. Textausgaben, Linien zeichen,.. alles kein Problem, aber sobald Grafik dazu kommt ist Schluß.
Ich hoffe hier meinen Lichtblick zu finden.
Moderiert von
Gausi: Delphi-Tags hinzugefügt
jaenicke - Do 02.07.09 17:46
Wie wäre es, wenn du nur TJpegImage benutzt statt da irgendwie mit TPicture rumzubasteln? ;-)
Ich meine statt das in Graphic zu speichern, kannst du das auch direkt in eine Variable schreiben.
jaenicke - Do 02.07.09 21:18
Wobei (Rave) Reports ja relativ wenig mit normalem Drucken wie oben zu sehen (Printer.Canvas) zu tun haben. ;-)
LitleBigMan - Fr 03.07.09 12:15
Erst einmal Danke an alle. Das Problem hat sich von selbst erledigt. Es lag an der JPG Datei. Irgendwie mag er diese Datei nicht. Jedes andere Program öffnet diese Datei, nur Delphi weigert sich. Jede andere JPG Datei funktioniert. Manchmal den Fehler nicht bei Delphi suchen oder an sich selber zweifeln, auch andere machen Fehler.
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!