Datenstruktur aus Delphi4 in Delphi7 übernehmen

[Giantics]

Hallo Forum,

ich habe ein kleines Problem:
Eine Datenstruktur die unter Delphi4 angelegt ist, muss in Delphi 7 weiterverarbeitet werden.

Die Struktur ist aber nicht gleich groß, was beim Lesen und Schreiben logischerweiße zu Datenmüll führt.

Hab irgendwo mal gelesen, dass ab einer bestimmten Delphi-Version die Records anderst angelegt werden, damit man schneller darauf zugreifen kann ?!?!???. Und mit dem Schlüsselwort packed könne man dies umgehen.

Allerdings ist nun die Datenstruktur in Delphi7 mit packed kleiner und ohne packed größer als in Delphi4 und ich weiß nicht wirklich an was das liegt....

Vielleicht hat da einer von euch eine Idee.

Vielen Dank für euere Mühe!

------- Datenstruktur -------

Delphi-Quellcode:

type TAnrede = (Herr, Frau);

type TStunde = (packed) record
    Dummy: array[0..11] of char;
    Std: array[0..14] of Extended;
    Art: array[0..14] of Integer;
    Stoerung: Boolean;
  end;

type TDataStruct = (packed) record
    Nr: Integer;
    PersNr: Integer;
    Anrede: TAnrede;
    Geb: TDate;
    Name: string[50];
    VorName: string[50];
    Strasse: string[50];
    Ort: string[50];
    Job: string[50];
    Tel: string[20];
    Info1: string[50];
    Info2: string[50];
    Info3: string[50];
    Eintritt: TDate;
    Austritt: TDate;
    WochenStd: Extended;
    UeberstdMax: Extended;
    Urlaub: Extended;
    SonderUrlaub: Extended;
    UrlaubErhalten: Extended;
    UrlaubVorjahr: Extended;
    UrlaubRest: Extended;
    Stoerung: Extended;
    Stunden: array[1..1240] of TStunde;
    LKZ: boolean;
    Picture: TPicture;
  end;

SizeOf(TDataStruct) = 283.276 in Delphi4SizeOf(TDataStruct) = 288.288 in Delphi7 und mit packed 277.067