danke für die hilfe, also die seite kann ich ausdrucken, allerdings muß ich die ganze seite etwas verschieben, da der drucker ränder hat, und ich das bild an position -4, -4 drucken muß zb
Die erste seite druckt nun das SVG richtig aus (allerdings noch verschoben)
meine zweite seite wäre ein versuch, das ganze zuerst in ein MetaFile zu schreiben und dieses dann etwas versetzt an den drucker zu schicken, allerdings kommt da nur eine leere seite raus
Delphi-Quellcode:
temp.BeginDoc;
grPrinter := TGPGraphics.Create(temp.Canvas.Handle);
try
grPrinter.SetPageUnit(UnitMillimeter);
grPrinter.SetSmoothingMode(SmoothingModeAntiAlias);
SVGImage1.SVG.PaintTo(grPrinter, Bounds, nil, 0);
finally
grPrinter.Free;
end;
temp.EndDoc;
Graphics := TGPMetaFile.Create;
SVGImage1.SVG.PaintTo(Graphics, Bounds, nil, 0);
temp.BeginDoc;
grPrinter := TGPGraphics.Create(temp.Canvas.Handle);
grPrinter.SetPageUnit(UnitMillimeter);
grPrinter.SetSmoothingMode(SmoothingModeAntiAlias);
grPrinter.DrawImage(Graphics, -4, -4);
grPrinter.Free;
temp.EndDoc;
Graphics.Free;
zu den texten, habe ein problem : und zwar stimmt die positionierung nicht, er schreibt texte teilweise übereinander bzw zu weit zusammen
wenn du dir mal das beispiel anguckst (beim text : Firmenbuchgericht bzw den Teil mit dem flughafen)