Frage zu record

[himitsu]

Wieso nicht?

Packed Records packen immer so, wie ich mir das denke.
= Kein Zwischenraum zwischen den einzelnen Feldern, was einem {$A-} | {$A1} | {$ALIGN 1} gleich kommt.

Ohne PACKED, bzw. mit ALIGN größer 1 muß man schon etwas nachdenken und wissen wie einige Typen intern aufgebaut sind, um die Ausrichtung zu erkennen.

[p80286]

Zitat von Iwo Asnet:

Ich würde das nicht tun!
Denn packed records packen manchmal eben nicht so, wie man sich das denkt. Irgendwann (Arrays mit ungerader Länge) wird doch auf das nächst gerade Byte ausgerichtet und -wupps- hat man den Salat.

a) Kannst Du das belegen?

b) falls ich Fremddaten lesen muß sieht das ungefähr so aus

Delphi-Quellcode:

myrecord=packed record.....end;

setlength(buffer,sizeof(myrecord));

gelesen:=fs.read(buffer,sizeof(buffer));

Gruß
K-H

[Iwo Asnet]

Also ich habe ein altes Projekt, wo das mit dem packed und alligned nicht so war.
Dort sind Packed records in Packed records und noch diverse packed array [0..4] of string[10] usw. deklariert und man hat sich gewundert, das beim Lesen der Daten ab der Stelle schießmichtot (3 Jahre her) ein Byteshift um 1 drin var.... Umgestellt auf explizites Lesen jedes Feldes => Alles paletti.

@p80286: Belegen kann ich das nicht mehr, das Projekt wurde ja verändert und funktioniert nun.

.... Aber wenn ich mir die alte Deklaration so anschaue, wundere ich mich, das dort packed record mit packed array und (!) array kombiniert wurde. Da wundert mich nüscht mehr!

Wird wohl daran gelegen haben...

[p80286]

Zitat von Iwo Asnet:

.... Aber wenn ich mir die alte Deklaration so anschaue, wundere ich mich, das dort packed record mit packed array und (!) array kombiniert wurde. Da wundert mich nüscht mehr!

Da bist Du nicht alleine, so etwas ist wohl jedem von uns mal passiert.

Gruß
K-H