Einzelnen Beitrag anzeigen

gargano

Registriert seit: 2. Okt 2006
76 Beiträge
 
Delphi 2007 Enterprise
 
#1

Größe in Bytes eines Arrays bestimmen

  Alt 7. Aug 2008, 13:25
Hallo,

ich habe ein verschachteltes Array von Records etwa von diesem Ausmaß

Delphi-Quellcode:
type
     TCalibPoint = record
                Active : Boolean;
                x,y : Single;
     end;

     TCalibArray = array of TCalibPoint;

     TCalibData = record
                  NoOfRegItems : Integer;
                  RegItems : Array of Double;
                  NoOfCItems : Integer;
                  CalibArray : TCalibArray;
     end;

     TCalibrationArray = array of TCalibData;
Die Arrays werden dynamisch erzeugt.
Wie kann ich die Größe von TCalibrationArray in Bytes ermitteln, ohne mit sizeof zu arbeiten ?
Sizeof liefert nur die Größe des Pointers also 4.

Ok, ich kann mit Length arbeiten und dann Length*Length*Sizeof usw... aber gibt es einen einfacheren Weg ?
Die Anzahl der Bytes brauche ich für LoadfromStream in der DB.

Viele Grüße
gargano
  Mit Zitat antworten Zitat