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