Drucken

Spezielle Fragen zu 2D- und 3D-Grafik, Sound und Video
Antworten
yoda
Moderator
Beiträge: 436
Registriert: Mo 2. Jan 2006, 22:35
Wohnort: bei Göttinge
Kontaktdaten:

Drucken

Beitrag von yoda » Sa 18. Okt 2014, 12:14

Hi,

Ich kann mir in meinem Programm eine Infokarte anzeigen lassen sihe Bild. Beim ausdrucken dieser Karte bin ich kräftig gescheitert.
Die Infokarte besteht aus einem TextLabel mit HTML Text.
Ich habe erst einmal versucht überhaupt einen Text auf dem Drucker zu bringen.

Hier der Code
gambas code
Public Sub columnview1drucken_Click()

' Auswahl Drucker
' Für Testzwecke günstig und erprobt
' Printer1.OutputFile = User.Home &/ "img_print.pdf"
If Printer1.Configure() Then Return

'Paint.DrawImage(imgPrint, iMarginLeft, iMarginTop, iDruckBreite, iDruckHoehe)
Paint.RichText("test", 10, 10)

Me.Enabled = False ' Das Formular wird deaktiviert
Inc Application.Busy ' Das Programm nimmt keine Eingaben mehr entgegen ...
Printer1.Print ' Der Druck wird gestartet
Dec Application.Busy ' Das Programm nimmt wieder Eingaben entgegen...
Me.Enabled = True ' Das Formular wird aktiviert

End


moni3.png
moni3.png (319.79 KiB) 1497 mal betrachtet


Flotte Grüße Yoda

Antworten

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 0 Gäste