Zitat von
gargano:
aber gibt es einen einfacheren Weg ?
Nein. Es gibt zu Arrays und Records kaum Metainformationen, so auch keine automatisch ermittelte Größenangaben. Länge*SizeOf(EinElement) ist bei dynamischen Arrays soweit ich weiss der einzige Weg. Bei solchen innerhalb eines Records müsstest du dann wtwas der Art "SizeOf(Record)-SizeOf(Record.MyDynArray)+Length(Record.MyDynArray )*(SizeOf(Record.MyDynArray[0]))" basteln. Etwas mehr Möglichkeiten gibt es mit published Membern von Klassen, deren Typen und Namen man sich z.B. zur Runtime via
RTTI beschaffen kann, wodurch man die Größenberechnung mehr oder weniger allgemein halten könnte, aber das ist auf keinen Fall weniger Aufwand, und eben auch nur mit Klassen möglich. (Ich weiss nicht genau wie es sich mit den erweiterten Records späterer Versionen als Delphi 7 genau verhält. Evtl. gibt es da ja etwas mehr
RTTI zu.)
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)