Registriert seit: 11. Mär 2003
Ort: Wehr
14 Beiträge
Delphi 6 Enterprise
|
TImage in Stream
8. Dez 2004, 13:00
Hallo zusammen!
Ich will in meiner Anwendung ein Bild speichern.
Das Bild lade ich in ein TImage mit Image.Picture.LoadFromFile(Filename).
Später will ich das Bild speichern.
Dazu gibt es in der Kommunikationsschicht der Anwendung (welche mit dem ApplicationServer kommuniziert) eine Methode zum Speichern von Blobs, die einen TStream erwartet.
Die einzige Möglichkeit die ich gefunden habe, das Bild aus dem TImage in einen Stream zu bekommen, ist Image.Picture.Bitmap.SaveToSTream(ImageStream). Allerdings ist der Stream danach immer leer, sprich er hat die Länge 0.
Hat jemand eine Idee, wie ich das Bild in den Stream bekomme?
MfG Dummbatz.
Thomas
|