Vektor Format anzeigen/drucken

[xaromz]

Hallo,

das Drucken ist ein Problem, weil der Drucker nicht auf Pixel eingestellt ist. Hier musst Du den Umweg über GDI+ gehen:

Delphi-Quellcode:

var
  Bounds: TGPRectF;
  Graphics: TGPGraphics;
begin
  Printer.BeginDoc;
  Bounds.X        := 0;
  Bounds.Y        := 0;
  Bounds.Width    := Printer.PageWidth;
  Bounds.Height   := Printer.PageHeight;

  Graphics := TGPGraphics.Create(Printer.Canvas.Handle);
  try
    Graphics.SetPageUnit(UnitPixel); // <-- Das hier schaltet die Einheit um
    Graphics.SetSmoothingMode(SmoothingModeAntiAlias);
    SVG.PaintTo(Graphics, Bounds, nil, 0);
  finally
    Graphics.Free;
  end;
  Printer.EndDoc;
end;

Die zusätzlichen Rects sind Update-Regions und werden normalerweise nicht benötigt. Die sind nur für das optimierte Zeichnen in Windows vorhanden.

Zitat von Gruber_Hans_12345:

hmmm, gibt es bei Texte irgendetwas zu beachten?

habe mit Inkscape mal ein SVG erzeugt, die Linien bekomme ich rein, aber die Texte nicht?

werde es dann mal mit CorelDraw probieren

[edit]mit Coreldraw kommend ie Texte auch mal gut an (ob die 100% passen, werde ich erst sehen, wenn ich das drucken mal im griff habe)

Wenn Du da Probleme hast (ich verwende immer Illustrator ab Version CS2), dann lad' einfach 'mal ein Bild hoch und ich guck drüber.

Gruß
xaromz