Record laden

[Chemiker]

Hallo grader,

schau dir mal das Tut. ‚Records in einem FileStream speichern’ an. Ich würde nicht lange Strings verwenden, sondern kurze Strings, wenn das Möglich ist. Bei langen String muss immer die Länge der Strings mit verwaltet werden, dies ist sehr aufwendig.
Bei kurzen Strings ist der Record immmer gleich groß.

statt:

Delphi-Quellcode:

type 
  TDatum = record 
  T,M,J: word; 
  Zh,Zm,B,O,T1,T2,T3,T4,P,N: String; 
end;

Delphi-Quellcode:

const strLaenge= 20; // Strings sind 20 Zeichen lang.
type 
 TDatum = packed record
    T:  Word;
    M:  Word;
    J:  Word;
    Zh: string[strLaenge];
    Zm: string[strLaenge];
    B:  string[strLaenge];
    O:  string[strLaenge];
    T1: string[strLaenge];
    T2: string[strLaenge];
    T3: string[strLaenge];
    T4: string[strLaenge];
    P:  string[strLaenge];
    N:  string[strLaenge];
 end;

Bis bald Chemiker