Delphi JPEGfolge und TFileStream, "JPEG-Fehler #42"

Thema durchsuchen

Ansicht

Themen-Optionen

JPEGfolge und TFileStream, "JPEG-Fehler #42"

Ein Thema von Te7Ris · begonnen am 25. Apr 2009 · letzter Beitrag vom 26. Apr 2009

Antwort

igel457

Registriert seit: 31. Aug 2005
1.622 Beiträge

FreePascal / Lazarus

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

25. Apr 2009, 22: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