Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Typisierte Datei mit Header erzeugen (https://www.delphipraxis.net/29473-typisierte-datei-mit-header-erzeugen.html)

Fischli80 9. Sep 2004 13:53


Typisierte Datei mit Header erzeugen
 
Hallöchen!

Ich möchte gerne eine typisierte Datei anlegen um eine Liste von Records zu speichern.
Soweit kein Problem, nur hätte ich gerne eine Art Header in der Datei für allgemeine
Infos dieser Datei. Wie mach ich dass? Einfach den Record 0 immer "frei" lassen und
dann die Datei nochmal als Binärdatei benutzen um die "freien" Bytes am Anfang zu
beschreiben oder geht das auch eleganter?

jfheins 9. Sep 2004 14:36

Re: Typisierte Datei mit Header erzeugen
 
Schreib doch einfach deine Header-Daten in den ersten Record und in die restlichen die daten
Zitat:

Zitat von Fischli80
Einfach den Record 0 immer "frei" lassen und
dann die Datei nochmal als Binärdatei benutzen um die "freien" Bytes am Anfang zu
beschreiben oder geht das auch eleganter?

Ich glaube das geht gar nicht ...

Chewie 9. Sep 2004 14:39

Re: Typisierte Datei mit Header erzeugen
 
Nimm doch einfach einen Delphi-Referenz durchsuchenTFileStream. Damit kannst du deine Daten reinschreiben, wie du lustig bist.

MrSpock 9. Sep 2004 14:52

Re: Typisierte Datei mit Header erzeugen
 
Hallo Fischli,

für solche Zwecke benutze ich gerne variante Records:

Delphi-Quellcode:
type
  Person = record
    case isHeader of
      True: (header: String[80]);
      False: (
         Name: String[60];
         Gehalt: Extended);
    end;
  end;
Die Länge aller Datensätze ist dann die Länge der längsten Variante.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:35 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