Jpeg in XML-Datei schreiben

[Stefan Dieler]

Hallo,

ich möchte eine Jpeg-Datei in eine XML-Datei schreiben.
Dazu müsste ich ja erst mal das Bild in einen Stream lesen und
anschließend den Stream in die XML-Datei schreiben. Bevor allerdings
die XML-Datei geschrieben wird, schreibe ich alle Daten, die gesammelt
werden in ein Objekt rein. Auch die Bilder müssen/ sollen erst darein.

Ich habe dazu mit einem MemoryStream experimentiert, aber so ganz
hat das nicht funktioniert. vSize hat immer den Wert 4.
blBild ist als String deklariert.

Folg. Code habe ich verwendet:

Delphi-Quellcode:

vBild := TMemoryStream.Create;
vBild.LoadFromFile('c:\test.jpg');
vBild.Position := 0;
vSize := SizeOf(vBild);
vBild.Write(FBilder[i].blBild, vSize);
vBild.Free;

Hat jemand eine Ahnung warum das nicht funktioniert, oder
vielleicht wie es funktioniert.

Vielen Dank an alle!

[Chewie]

Du scheinst nicht zu wissen, dass Objekte im ObjectPascal Referenztypen sind, Objekt-Variablen sind also nur Zeiger. SizeOf() eines Zeigers ist auf 32 Bit-Systemen 32 Bit. Um die Größe eines Streams zu ermitteln, hat ein solcher das Property Size.
Darüber hinaus ist SizeOf() keine Funktion, sondern eine Art Makro, das bereits zur Compilerzeit ausgewertet wird. Allein schon deswegen kanns nicht funktionieren.