Array of Byte in eine Datei schreiben

[Cyberstorm]

Mit welchem Code kann ich ein Array of Byte in eine Datei schreiben?

Danke

[mkinzler]

Mit einer Schleife

[SirThornberry]

Zitat:

Zitat von Cyberstorm

Mit welchem Code kann ich ein Array of Byte in eine Datei schreiben?

Danke

Könntest du die Frage bitte präzisieren? Wir helfen gern aber wir machen nicht kostenlos die Arbeit für andere.
An welcher Stelle kommst du nicht weiter? Was hast du schon?

[Cyberstorm]

weiß einfach nicht, wie ich das anstellen soll. file of byte? stream?

[Cyberbob]

Du könntest das Array of Byte auf als eigene Datentyp deklarieren und eine Datei diesen Datentyps erstellen. Das einfachste ist aber, das Araay von Anfang bis Ende durchzulaufen und die Wert in einer Date des Types Byte abzulegen!
Wo genau kommst du denn nicht weiter?
Wenn du einfach nur Speichern willst, nimm Fileof Byte und speichere es wie gesagt mittels einer Schleife

[Neutral General]

Hi,

Das einfachste, und schnellste ist, einen T(Memory)Stream zu benutzen und mit der Methode Write das Array in die Datei zu schreiben. (Beim MemoryStream SaveToFile nicht vergessen!). Schreiben tut man, indem man als ersten Parameter das erste Element des Arrays übergibt und der 2. Parameter (Anzahl der zu schreibenden Bytes) muss Length(DeinArray)*SizeOf(Byte) sein.

[Apollonius]

Warum sollte man einen TMemoryStream verwenden? Mit einem TFileStream spart man sich das Herumschieben im Speicher. Aber gegen die Pascal-Routinen spricht auch nichts.

[Neutral General]

Zitat:

Zitat von Apollonius

Warum sollte man einen TMemoryStream verwenden? Mit einem TFileStream spart man sich das Herumschieben im Speicher. Aber gegen die Pascal-Routinen spricht auch nichts.

Ich hab das Memory ja auch in Klammern geschrieben. Ich persönlich benutze halt gerne MemoryStreams :P

[divBy0]

TFileStream geht auch.

Delphi-Quellcode:

fs := TFileStream.Create('test.txt', fmCreate);

    fs.Write(Bytes[0], Length(Bytes)*SizeOf(Byte));

fs.Free;

[SirThornberry]

@divBy0: gelernt hat der Fragesteller jetzt aber rein gar nichts :-( Er kam ja bereits selbst darauf das es File of Byte etc. gibt also hätte die Suche oder ein näheres damit befassen ihm das Ergebnis auch gebracht. So wird es aber wohl leider auf das abtippen hinaus laufen :?

[inherited]

Sollte man hier nicht besser WriteBuffer benutzen?

Zitat:

Zitat von http://www.freepascal.org/docs-html/rtl/classes/tstream.write.html über TStream.Write

This method should be used when the number of bytes that should be written is not determined. If a specific number of bytes should be written, use TSTream.WriteBuffer instead.

[shmia]

Zitat:

Zitat von inherited

Sollte man hier nicht besser WriteBuffer benutzen?

Man sollte eigentlich immer (*) WriteBuffer anstelle Write benützen, weil dann geprüft wird ob auch wirklich die gewünschte Anzahl von Bytes geschrieben wurden.
Falls nicht wird eine Exception ge"raised".
Das Gleiche gilt auch für Read und ReadBuffer.

*) Ausnahme: wenn man eine Streamklasse ableitet oder einen Proxystream entwickelt gilt das nicht.
Dann benützt man die Streamklasse quasi von Innen.

[Cyberstorm]

Zitat:

Zitat von divBy0

TFileStream geht auch.

Delphi-Quellcode:

fs := TFileStream.Create('test.txt', fmCreate);

    fs.Write(Bytes[0], Length(Bytes)*SizeOf(Byte));

fs.Free;

danke!

[jottkaerr]

Zitat:

Zitat von divBy0

TFileStream geht auch.

Delphi-Quellcode:

fs := TFileStream.Create('test.txt', fmCreate);

    fs.Write(Bytes[0], Length(Bytes)*SizeOf(Byte));

fs.Free;

Statt SizeOf() auf den Datentyp des Arrays anzuwenden, sollte man es besser direkt mit einem Element des Arrays aufrufen:

Delphi-Quellcode:

  fs.Write(Bytes[0], Length(Bytes) * SizeOf(Bytes[0]));

Das hat den Vorteil, dass man bei einer späteren Änderung des Datentyps (z.B. von Byte zu Word) nicht noch solche Stellen suchen muss. Dem Compiler ist es übrigens egal, ob Bytes[0] tatsächlich existiert; ihn interessiert nur der Typ des Ausdrucks.

jkr