TImage in Stream

[Dummbatz]

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.

[Luckie]

Zitat:

Zitat von Dummbatz

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?

Delphi-Quellcode:

Image.Picture.Bitmap.SaveToSTream(ImageStream);

So. wenn das bei dir nicht klappt, dann machst du was falsch.

[jim_raynor]

Zitat:

Zitat von Luckie

Zitat:

Zitat von Dummbatz

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?

Delphi-Quellcode:

Image.Picture.Bitmap.SaveToSTream(ImageStream);

So. wenn das bei dir nicht klappt, dann machst du was falsch.

Oder er benutzt keine Bitmap-Dateien sonder zum beispiel JPEG. Dann steht meines Wissens nach in Bitmap nichts drin.

Hatte TImage nicht ne Funktion SaveToFile? Wenn ja dann speicher es als temporäre Datei und lade es mit einem TFileStream. Nicht gerade schön, aber sollte funktionieren.