IMHO.WS

IMHO.WS (https://www.imho.ws/index.php)
-   Программирование (https://www.imho.ws/forumdisplay.php?f=40)
-   -   Delphi: Сохранение дин. 3D массива в файле (https://www.imho.ws/showthread.php?t=54657)

ReapeR 24.03.2004 14:45

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

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

ReapeR 24.03.2004 14:52

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

t_G_M_ 01.04.2004 02:31

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

Да, кстати, ты хэлп по процедуре 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 01.04.2004 11:34

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

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


Часовой пояс GMT +4, время: 11:19.

Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.