Delphi: Сохранение дин. 3D массива в файле

[ReapeR]

Подскажите как сохранить динамический трехмерный массив в файл прямо из памяти (блоком).
массив определяется как:
M3D : array of array of array of double;

пробовал через blockwrite, но в файл попадает левая информация.
blockwrite(f,M3D,4,WriteBlocks) //4 блока по 1024 байта

[ReapeR]

если в blockwrite поставить M3D^ то дельфи ругаются на несовпадение типов.

Левая информация какого типа? В этой информации хотя бы часть твоего массива присутствует?

Да, кстати, ты хэлп по процедуре BlockWrite смотрел?
Сейчас у меня нет времени разбираться, но вот часть кода оттуда:

var
FromF, ToF: file;
NumRead, NumWritten: Integer;
Buf: array[1..2048] of Char;

begin
........................

repeat
BlockRead(FromF, Buf, SizeOf(Buf), NumRead);
BlockWrite(ToF, Buf, NumRead, NumWritten);
until (NumRead = 0) or (NumWritten <> NumRead);

........................
end;

Ну а если не будет другого выхода, то придется делать перебором элементов.

[ReapeR]

t_G_M_
Левая информация - это например названия компонент использованные в программе.
Хелп смотрел, куда уж без него.

Я уже сделал перебором элементов, работает достаточно быстро, но все же хочется разобраться с этим моментом (на будущее так сказать)