Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Datei Binary öffnen (https://www.delphipraxis.net/144777-datei-binary-oeffnen.html)

schwa226 16. Dez 2009 10:52


Datei Binary öffnen
 
Hi,

zu file open & read habe ich nicht so viel Erfahrung deswegen muss ich einfach fragen!

Ich habe eine Datei im binär format.

Nun ist die Struktur der Datei so:

Delphi-Quellcode:
  TData = record
    Data : Byte;
    Root : Byte;
    Name : Byte;
    Category : Byte;
    Reserved : Byte;
  end;

  THeader = record
    Length : Byte;
    ID : Array[0..3] of Char;
    Version : Byte;
  end;
Also der Aufbau zeuerst ist der THeader in der Datei und dann bis EOF ein Array of TData.

Wie öffne/lese und speicher ich das am einfachsten wieder ab?

Danke!

Klaus01 16. Dez 2009 10:54

Re: Datei Binary öffnen
 
das sollte mit TFileStream möglich sein.
In den FileStream die Datei einlesen und dann
Stückweise lesen (Header, Daten)

Grüße
Klaus

wicht 16. Dez 2009 11:17

Re: Datei Binary öffnen
 
Die Zeile

Delphi-Quellcode:
ID : Array[0..3] of Char;
sollte man vielleicht in

Delphi-Quellcode:
ID : Array[0..3] of AnsiChar;
ändern, um die auch mit früheren/späteren Delphi-Versionen die Datei richtig zu lesen.

schwa226 16. Dez 2009 11:35

Re: Datei Binary öffnen
 
Danke an Beide!

Das mit AnsiChar hab ich gerade gesehen.

Auch habe ich das nun mit FileStream hinbekommen!

Danke!


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:58 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz