Thema: Delphi File of eigener Typ

Einzelnen Beitrag anzeigen

Benutzerbild von Chemiker
Chemiker

Registriert seit: 14. Aug 2005
1.859 Beiträge
 
Delphi 11 Alexandria
 
#16

Re: File of eigener Typ

  Alt 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.
  Mit Zitat antworten Zitat