TImage drucken?

[Rossi123]

Hallo,
Ich habe ein Image erstellt, das ein vielfaches von der grösse eines A4 Blattes hat. Das nutze oder will ich als Druckvorschau nutzen... nur irgednwie weis nich nicht wie ich dem drucker jetzt sage das er dieses image drucken soll... kann mir da jemand helfen?

[Rossi123]

hat keiner nen tip?

mein quelltext sieht im moment so aus, nur leider druckt er nen leeres blatt.... ^^

Delphi-Quellcode:

Printer.BeginDoc;
    Canvas.CopyMode:=cmSrcCopy;
    Canvas.CopyRect(Rect(0,0,2480,3508),
                    image1.Canvas,
                    Rect(0,0,560,450));
    Printer.EndDoc;

[marabu]

Hallo,

ich kann nicht erkennen auf was du Canvas beziehst. Wenn es das Canvas der Form ist, dann ist klar, dass nichts beim Drucker ankommt. Vergleiche deinen Versuch mal mit diesem Tipp: Wie kann ich ein Bild drucken?

Grüße vom marabu

[Rossi123]

Danke, es hat funktioniert...

jetz nur noch eins, kann ich das TImage, welches ja ein vielfaches von einem A4 blatt ist, auf dir grösse eines A4 blatttes zerren?

[marabu]

Ja, gewiss. Dazu möchtest du dir die Beschreibung zum Windows API call StretchBlt() durchlesen. Du findest mit diesem Suchbegriff auch bestimmt Code-Beispiele in der DP und anderswo.

Freundliche Grüße

[Rossi123]

gut jetz habbich das rüber kopiert, in dem image befindet sich aber text, welcher seine grösse behällt, es sei denn ich verdopple das ganz auf das dopple der blatt grösse.... soll aber a4 bleiben.

Wie bekomm ich das jetzt hin, das sich die schrift vergrössert und die abstände zwischen den einzenlenen wörtern sich anpassen?