Einzelnen Beitrag anzeigen

Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#4

Re: Typisierte Datei mit Header erzeugen

  Alt 9. Sep 2004, 14:52
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.
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat