Wie kann man Informationen eines Arrays ermitteln?

[mytbo]

Zitat von KodeZwerg:

..., mir geht es um die Größe wenn man das ganze zum Beispiel auf Festplatte sichern möchte oder in einem Stream schreiben etc, ...

Du verwendest doch mORMot. Warum dann nicht hier?

Delphi-Quellcode:

uses
  mormot.core.base,
  mormot.core.data,
  mormot.core.text,
  mormot.core.json,
  mormot.core.rtti;

var
  binary: RawByteString;
  mulDimArr: TIntegerDynArrayDynArray;
begin
  SetLength(mulDimArr, 2);
  SetLength(mulDimArr[0], 2);
  mulDimArr[0][0] := 3;
  mulDimArr[0][1] := 4;
  SetLength(mulDimArr[1], 3);
  mulDimArr[1][0] := 2;
  mulDimArr[1][1] := 5;
  mulDimArr[1][2] := 8;

  binary := DynArraySave(mulDimArr, TypeInfo(TIntegerDynArrayDynArray));
  SetLength(mulDimArr, 0);

  DynArrayLoad(mulDimArr, PAnsiChar(binary), TypeInfo(TIntegerDynArrayDynArray));
  ShowMessage(Utf8ToString(IntegerDynArrayToCsv(mulDimArr[0])) + ' | ' + Utf8ToString(IntegerDynArrayToCsv(mulDimArr[1])));

Und mit FileFromString(binary, 'FileName.data') ist es auf der Festplatte.

Bis bald...
Thomas