Bilder verkleinern ???

[Predator]

moin Jungs !!!

Erstmal Frohe Wheinachten (naja bissel spät hehe)

Ich wollte mal fragen ob mir jemand einen code posten kann womit ich ein Bild auf eine bestimmte Größe setzen kann ? Das muss alles mit der TImage Komponente geschehen, da ich da jpeg einlesen kann.

Ich habe im großen und ganzen vor ein Cover Druck Proggi zu coden.

Die Bilder einlesn bzw. in der TImage Komponente kann ich (ist ja einfach ) nur wie kann ich diese jetzt auf eine bestimmte größe setzen und dann drucken ? Die Größe ist natürlich in Pixel anzugeben.

Also schonmal danke im voraus.

[Mirilin]

Du könntest es vielleicht mit StretchDraw auf das Canvas des Druckers malen.

mfg Tobias

[Predator]

gibts da ein Tut wie ich mit den Canvans arbeite ?

Hab null peilung davon was du meinst.

[himitsu]

Kannst ja mal in meine alte Demo reinschaun.
Da sind einige Werte zum Drucker (TPrinter) drin aufgeschlüsselt.

Der Zeichenfläche ist, so weit ich das noch weiß, Printer.Canvas und kann genauso bearbeitet werden wie die anderen Canvas auch (Image.Canvas).
Die Größe des Canvas hängt von den Einstellungen in den Printer ab (Auflösung und so).

Es kann aber sein das die DFM defekt ist, so dass das Formular nicht angezeigt wird. Beim öffnen mit D4 wurde jedenfalls gemeckert. (mit D7 ging es aber noch bis vor kurzen - hab D7 aber gerade nicht drauf, kann also nicht noch mal testen)

[Predator]

hmm sieht kompliziert aus.
kann denn keiner einfach einen kleinen code posten oder am besten eine funktion dann werd eich da villeicht schneller schlauer draus.

[toms]

Hi,

Vielleicht hilft dir das oder das.