Einzelnen Beitrag anzeigen

Benutzerbild von igel457
igel457

Registriert seit: 31. Aug 2005
1.622 Beiträge
 
FreePascal / Lazarus
 
#4

Re: JPEGfolge und TFileStream, "JPEG-Fehler #42"

  Alt 25. Apr 2009, 23:51
Der Fehler passiert jedem, der versucht JPEGs Sequentiell aus Dateien zu laden. Problem: JPEGs beinhalten keine Informationen darüber, wann die Bilddaten zuende sind, bzw. die Delphi-Unit ignoriert diese.

Lösung:
Speichere die JPEGS zunächst in einen Memorystream. Schreibe dessen Größe in deinen Filestream. Speichere den Memorystream in den Filestream.

Bei Laden ließt du zunächst die Größe wieder aus und kopierst so viele Bytes aus dem Filestream in den Memorystream. Lade das JPEG aus dem Memorystream.
Andreas
"Sollen sich auch alle schämen, die gedankenlos sich der Wunder der Wissenschaft und Technik bedienen, und nicht mehr davon geistig erfasst haben als die Kuh von der Botanik der Pflanzen, die sie mit Wohlbehagen frisst." - Albert Einstein
  Mit Zitat antworten Zitat