Forum: Object-Pascal / Delphi-Language
Delphi
by brechi,
21. Apr 2008
Also der Code von dir funtkoineit so auch nicht. Als Beispiel hab ich:
type xt = record
a: extended;
b: integer;
c: byte;
end;
begin
writeln(SizeOf(xt),' ',csGetRecordSize(, 8));
Forum: Object-Pascal / Delphi-Language
Delphi
by brechi,
19. Apr 2008
extended ist 10 vill liegts daran :) danek erstmal werd morgen mal testen
Forum: Object-Pascal / Delphi-Language
Delphi
by brechi,
19. Apr 2008
Ne weil ich die Records erst zur laufzeit "selbst" erzeuge. Den Aufbau des Records kenn ich zur Designzeit nicht.
Forum: Object-Pascal / Delphi-Language
Delphi
by brechi,
18. Apr 2008
bisher habe ich folgenden code um die größe von Records (Alignment 1,2,4,8) zur Laufzeit zu bestimmen
der Code sollte selbsterklärend sein, aber ich bin zu dumm dafür :( oder einfach zu müde, also wenn sich jemand dran machen will dann gerne :)
function GetRecordSize(types: array of TxType; Alignment: Integer): Integer;
var
i: integer;
max: integer;
begin
max := 0;
for i :=...