Seite 1 von 1

Einfach den Fensterinhalt drucken

Verfasst: 05.02.2012 17:38
von gnaps
Hallo Forum,

heute muss ich mich an Euch wenden, denn ich habe Probleme mit dem Drucken.

Ich schreibe hier für unsere Firma eine Datenverwaltung, die Verwaltung der Daten über SQL funkt schon,
jedoch habe ich Probleme beim ausdrucken.

Ich möchte ein DIN A4 Formular laden, als Hintergrund im Fenster anzeigen, hier an den richtigen Stellen
die Daten anzeigen lassen und dann das ganze ausdrucken.

Wie stelle ich das an.

Das Formular einladen und die Datenfelder an der richtigen Pos steht schon alles, wie drucke ich das ganze jetzt aus ??

Gruß
gnaps

Re: Einfach den Fensterinhalt drucken

Verfasst: 05.02.2012 18:35
von ts-soft
Statt das Formular auf das Fenster zu malen, besser auf ein ImageGadget in Fenstergrösse,
dann kannst Du folgenden Code verwenden:

Code: Alles auswählen

Procedure PrintWindow(nImage)
  
  If PrintRequester()
    If StartPrinting("Print window")
      If StartDrawing(PrinterOutput())
        DrawImage(ImageID(nImage),ImageWidth(nImage),ImageHeight(nImage))
        StopDrawing()
      EndIf
      StopPrinting()
    EndIf
  EndIf
EndProcedure
Evtl. das Image noch Resizen, sonst haste einen sehr kleinen Ausdruck :wink:

Re: Einfach den Fensterinhalt drucken

Verfasst: 05.02.2012 19:23
von gnaps
Hi,

vielen Dank für die schnelle Antwort,
nur wie bekomme ich das ImageGadgets und die Textgadgets in nImage ??

Gruß
gnaps

Re: Einfach den Fensterinhalt drucken

Verfasst: 05.02.2012 19:29
von ts-soft
Nix Gadget, alles malen mit der 2DDrawing lib von PB.

Ansonsten hilft vielleicht diese API: PrintWindow
Beispiele hierzu im engl. Formum, die funktionieren bei mir allerdings nicht,
so das ich da nicht helfen kann.