Вниз
Скачать: CL | DM;

Сохранение массива в файл   Найти похожие ветки 

← →
Vitaliy_____   (2008-09-25 10:09) [0]

Добрый день.
Имеется матрица, объявленная как
array of array of double;
Требуется сохранить ее в файл.
Изначально было сохранение матрицы поэлементно

for i_save:=0 to Mat.SizeY-1 do
for n_save:=0 to Mat.SizeX-1 do
 FileWrite(iFileHandle,Mat.data[i_save,n_save],DoubleVarSize);

где mat.data - и есть матрица, SizeX и SizeY - ее размеры.
Однако при работе с большими матрицами, скажем 9000 элементов этот процесс оказался медленным.
Требуется сохранять матрицу "по строкам", записывая сразу по 9000 элементов. Однако код

StringSize:=SizeX*DoubleVarSize;
 for i_save:=0 to SizeY-1 do
  FileWrite(iFileHandle,TDoubleArray(data[i]),StringSize);

Не работает. Или динамический массив в памяти лежит не последовательно (что вряд ли) или я не понимаю в чем дело.
Подскажите, как лучше решить проблему ускорения записи...


← →
Поросенок Винни-Пух ©   (2008-09-25 10:11) [1]

Райтфайлу нужен адрес, а не указатель


← →
Поросенок Винни-Пух ©   (2008-09-25 10:14) [2]

function FileWrite(Handle: Integer; const Buffer; Count: LongWord): Integer;

data[i] это динамический массив, то есть ты передаешь указатель вместо адреса по которому расположены элементы


← →
Vitaliy_____   (2008-09-25 10:17) [3]

Извиняюсь за пустой вопрос... Туплю я - читаю/пишу ссылки а не сами элементы...
Достаточно исправить на
FileWrite(iFileHandle,data[i,0],StringSize);
Самому смешно :)


← →
Vitaliy_____   (2008-09-25 10:18) [4]


>
> data[i] это динамический массив, то есть ты передаешь указатель
> вместо адреса по которому расположены элементы

Во-во. Достаточно дать его 0 элемент и писать все. Сейчас проверю, вроде работает...



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
15-1220977765
NailMan
2008-09-09 20:29
2008.11.02
Какой-то батут с Explorer.exe при вызове горячими клавишами


2-1222372060
DFT
2008-09-25 23:47
2008.11.02
RandomRange


2-1222330966
Nick87
2008-09-25 12:22
2008.11.02
Delete + Update


4-1198654568
Cj
2007-12-26 10:36
2008.11.02
Получить путь и имя процесса


2-1222171076
Nick87
2008-09-23 15:57
2008.11.02
перерисовка combobox




   Наверх