Bitmap drucken

primula · Hält's aus hier Beiträge: 4 Win 2000 D6 Pers

Hallo,
ich habe ein TBitmap mit Bild:=TBitmap.create; usw. erstellt. Es funktioniert alles wie geplant, jetzt aber möchte ich es wenn man auf einen Button drückt ausdrucken. Wie funktionert das?Wie kann man die Einstellungen vom Drucker einstellen(Querformat usw.)?

JayEff · Beiträge: 2971 Windows Vista Ultimate D7 Enterprise

versuchs, indem du auf den Printer per canvas schreibst. vorgender code sollte reichen, den rest findest du auch in der delphi hilfe unter printer...

markieren

Delphi-Quelltext

1:
2:
3:

Printer.BeginDoc;
Printer.Canvas.TextOut(100,100,'hallo wie gehts?');
Printer.EndDoc;

das druckt an der stelle 100,100 den text "hallo wie gehts" aus.
da ein Canvas eine Leinwand ist, kannst du darauf auch eine bitmap stellen.. wie das funzt: delphi hilfe!

ich hoffe ich konnte dir damit genug hilfe verschaffen...

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.

wulfskin · Verfasst: Fr 03.12.04 19:18

Hallo primula,

JayEff hat dir schon den wichtigen Tipp gegeben: Benutze TPrinter.Canvas! Doch bevor du dich wunderst: Die Größe des Bilder hängt von der Auflösung des Druckers ab (DPI - DotsPerInch), dass heisst, du solltest die Größe des Bildes anpassen, bevor du es auf des Bild mast (siehe SetDeviceCaps). Die Orientierung kannst du übrigens mit TPrinter.Orientation ändern.

Gruß Hape!

_________________
Manche antworten um ihren Beitragszähler zu erhöhen, andere um zu Helfen.

primula · Hält's aus hier Beiträge: 4 Win 2000 D6 Pers

Danke für den Typ!Druckt jetzt nach meinen Wünschen aus.

Heiko · Beiträge: 3169 Erhaltene Danke: 11

Als Ergänzung zu wulfskin:
Hochformat stellts du ein mit

markieren

Quelltext

1:	TPrinter.Orientation:=poPortrait

und Querformat mit

markieren

Quelltext

1:	TPrinter.Orientation:=poLandscape

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme