Dusty - Sa 01.11.03 14:40
Titel: TImage drucken

---

1.

In meinem Programm lade ich über LoadFromFile ein JPEG in ein TImage. Dieses Bild kann man in die Zwischenablage kopieren und in ein anderes TImage einfügen (image.picture.assign(clipboard)). Am Bildschirm funktioniert dies. Wenn ich das TImage dann aber mit

Printer.Canvas.Stretchdraw(Rect,Image.Picture.Graphic)

auf dem Papier anzeigen lassen will, so geht dies nicht mit dem Bild, welches über die Zwischenablage eingefügt wurde. Das Bild ist definitiv in TImage vorhanden, es ist nicht empty und Image.Picture.Graphic.width bzw. Image.Picture.Graphic.height geben die korrekte Größe an, aber das Papier bleibt leer. Ich habe dafür keine Erklärung.

2.

Kann ich TIFF Bilder mit Delphi bearbeiten analog meinen JPEG-Bildern?


Help!

tommie-lie - Sa 01.11.03 15:14

---

Zu 2.:
Die Komponenten, die Delphi mitbringt, können es nicht, aber eine bekannte Bibliothek ist Mike Lischke's GraphicEx, zu finden unter http://www.delphi-gems.com/Graphics.php

Dusty - Sa 01.11.03 16:23

---

Die Bibliothek ist VIEL zu umfangreich. Eine Funktion / Komponente, welche mir ein TIFF in ein JPEG umwandelt, würde völlig ausreichen. Das ganze darf die Mini-Applikation nicht unnötig aufblähen.