Array of TJepeg in Blob schreiben und lesen

[Smiley]

@Himitsu
Die Beispiele von ComponetAce habe ich mir angesehen.

Zu deinem ersten Link

Zitat:

Ja, die ZIP kann ein Stream sein

Hier der Code aus dem Link
FileName := 'C:\test.zip';
OpenArchive(fmCreate);
BaseDir := 'C:\';
fileStream := TFileStream.Create('C:\test.txt', fmOpenReadWrite);
AddFromStream('anothername.txt', fileStream);
CloseArchive();

Bei den anderen Beispielen dasselbe, es ist immer nur eine Seite ein Stream, die andere Seite ist eine Datei.

Außerdem hat scrat1979 geschrieben

Zitat:

Ich denke du wirst nicht drumrumgekommen, die ZIP-Datei temporär auf der Platte zu speichern und z.B. bei ZiForge mittels ExtractToStream(Filename...) die Datei in das Image zu entpacken.

Und der muss es ja wissen.

Zitat:

@Himitsu
oder wirklich zusammen, als ein Ding (z.B. als MJPEG oder ein anderes Videoformat)

Das geht leider auch nicht, da ich nur eine Reihe von Bildern habe, die in einem Abstand von 40ms nacheinander abgespielt werden müssen.
Ein Video daraus zu machen bedeutet 40ms lang das gleiche Bild zu duplizieren und damit die Datei enorm aufzublähen.
Der Sinn dieser Bildfolge ist es mit möglichst wenigen Bildern eine noch flüssige Bewegung zu zeigen um Platz zu sparen.
Die optimalste Art das zu speichern ist meiner Ansicht nach, ein Jpeg-Array.

Meine Frage ist: Kann man ein Array aus Bildern in einen Blob speichern (sollte doch machbar sein)
und kann man sie auch wieder in diesem Format herausholen
und wie ist die Syntax dazu.

Der Code in meinem Beispiel unter
// Video einlesen und in Image schreiben
if (AktData.Typ = 'V') then
ist nur so dahingeschrieben um zu zeigen was ich machen will, ich denke nicht, dass es genauso machbar ist.

Trotzdem Danke dass Du Dir Gedanken dazu gemacht hast Himitsu

[himitsu]

Zitat von Smiley:

Zitat:

Delphi-Quellcode:

fileStream := TFileStream.Create('C:\test.txt', fmOpenReadWrite);
AddFromStream('anothername.txt', fileStream);

Bei den anderen Beispielen dasselbe, es ist immer nur eine Seite ein Stream, die andere Seite ist eine Datei.

Ja klar, aber wie gesagt -> man kann auch TMemoryStream statt TFileStream verwenden, dann bleibt es im Programm
und der "Dateiname" in AddFromStream ist ja die "Addresse" innerhalb der Zip, wo man speichern oder auslesen will ... also passt schon.



MJPEG ist ein Stream, wo meistens am Anfang das Timing angegeben wird (z.B. die Pause von 40ms) und dann kommen viele JPEGs, die nacheinander angezeigt werden.
Wird z.B. gern von IP-Webcams benutzt, da man dafür kein "aufwändiges" Videoencoding in der Firmware braucht. (einfach nur Fotos machen und nacheinander ein neues JPEG ausgeben, was man mit dem vorherrigen Bild nicht unbedingt differenz-verrechnen muß)

[Smiley]

Zitat von himitsu:

man kann auch TMemoryStream statt TFileStream verwenden, dann bleibt es im Programm
und der "Dateiname" in AddFromStream ist ja die "Addresse" innerhalb der Zip, wo man speichern oder auslesen will ... also passt schon.

Wenn das funktioniert wäre das meine Lösung um die Daten aus der alten Datenbank auszulesen und dann als MJPEG neu abzuspeichern.
Ich müsste die Zip-Datei aus dem Blob lesen in einen Blobstream oder gleich einen Memory Stream. Dann die einzelnen Dateien B01 bis B120 in einen MJPEG schreiben und diesen dann in der neuen Datenbank in das Blob-Feld schreiben.
Geht das so ?
Wie verwendet man MJPEG ? (füllen,lesen,abspielen)
Habe mich noch nie MJEG beschaftigt.

Diese Lösung gefällt mir.