Registriert seit: 14. Aug 2005
1.859 Beiträge
Delphi 11 Alexandria
|
Re: File of eigener Typ
26. Mai 2010, 23:09
Hallo himitzu,
Zitat von himitzu:
Aber dennoch würde ich eine "ordentliche" Speicherausrichtung nicht übergehen und hierbei manuell für die
Delphi-Quellcode:
TNote = 1..6;
TBuch = packed record 8 Byte-Align 4 Byte
Titel: String[51]; // 52 Byte = 6,5 > 6,5 = 13 >13
Autor: String[51]; // 52 Byte = 6,5 >13 = 13 >26
Erscheinungsjahr: TDate; // 8 Byte = 1 >14 = 2 >28
DatumEintrag: TDate; // 8 Byte = 1 >15 = 2 >30
ISBN: LongInt; // 4 Byte = 0,5 >15,5 = 1 >31
Kommentar: String[105{oder 97}]; // 106 Byte = 13,25 >28,75 = 26,5 >57,5
Bewertung: TNote; // 1 Byte = 0,125>28,875 = 0,25>57,75
Privat: Boolean; // 1 Byte = 0,125>29 = 0,25>58
end;
Für 'nen 32-Bit-Prozess also eine passende Ausrichtung.
damit ist der Record doch genauso groß wie der vom Beitragsersteller ohne packed.
Zudem ist man teilweise an die Größe von Feldern gebunden. Für eine deutsche PLZ braucht man nicht mehr als 5 Stellen(es sei denn wir kaufen demnächst Griechenland und Spanien usw.).
Bis bald Chemiker
wer gesund ist hat 1000 wünsche wer krank ist nur einen.
|
|
Zitat
|