Thema: Delphi Canvas drucken

Einzelnen Beitrag anzeigen

Andreas L.

Registriert seit: 23. Mai 2011
Ort: Furth im Wald
308 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: Canvas drucken

  Alt 10. Apr 2013, 10:53
Danke erstmal für die Antwort.
Leider hab ich keine Ahnung wenn du z.B. schreibst DeinCanvas... prog noch net solang
Könntest du es mir etwas einfacher erklären?
In deinem ersten Post steht das du dein Koordinatensystem auf ein Canvas zeichnest. Und dieses Canvas muss an das Printer.Canvas übergeben werden. Oder du zeichnest das Koordinatensystem direkt auf das Printer.Canvas. Damit du nicht doppelten Code für das Zeichnen schreibst, machst du dir eine Routine der du das Canvas übergeben kannst:

Delphi-Quellcode:
procedure DrawToCanvas(ACanvas: TCanvas);
begin
  ACanvas.LineTo(..);
  ...
  ...
end;

// Aufruf:

DrawToCanvas(PaintBox1.Canvas); // auf eine PaintBox zur visuellen Darstellung malen
DrawToCanvas(Printer.Canvas); // auf den Printer zum drucken malen
Also in etwa so wie Bummi es schon geschrieben hat.
Andreas Lauß
Blog
  Mit Zitat antworten Zitat