Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.08.21;
Скачать: CL | DM;

Вниз

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

 
Condor ©   (2003-08-07 13:24) [0]

Скажите, пожалуйста, можно ли сохранить динамический массив в файл?


 
PVOzerski ©   (2003-08-07 13:26) [1]

В нетипизированный через blockwrite, причем как буфер передавать не массив, а его начальный элемент.


 
PVOzerski ©   (2003-08-07 13:26) [2]

Уточнение: это если массив одномерный.


 
Condor ©   (2003-08-07 13:36) [3]

А можно простой пример? array of integer


 
Serginio1   (2003-08-07 13:41) [4]

FileStream.Write(ar[0],Length(ar)*SizeOf(Integer));


 
PVOzerski ©   (2003-08-07 13:46) [5]

var
x:array of integer;
f:file;
begin
setlength(x,10);
assignfile(f,"x");
rewrite(f,sizeof(integer));
blockwrite(f,x[0],length(x));
closefile(f);
end.


 
pasha_golub ©   (2003-08-07 13:49) [6]


var
a:array of integer;
f:file;
begin
SetLength(a,5);
A[0]:=5;
A[1]:=3;
A[2]:=6;
A[3]:=1;
A[4]:=8;
AssignFile(f,"d:\temp.txt");
Rewrite(f,sizeof(integer));
showmessage(inttostr(high(a)));
BlockWrite(F,a[0],High(a)+1);
CloseFile(f);
end;


 
Condor ©   (2003-08-07 13:53) [7]

Спасибо



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

Текущий архив: 2003.08.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
14-68528
Гамлет
2003-08-04 20:07
2003.08.21
Ghostscript


1-68316
Still Swamp
2003-08-06 11:29
2003.08.21
Owner.Free


1-68285
Pindos
2003-08-07 01:50
2003.08.21
DsgnIntf.dcu - У кого есть такой зверь?


1-68274
Xeon
2003-08-06 06:49
2003.08.21
Всё в одном


14-68475
vopros
2003-08-06 10:09
2003.08.21
Приехал из отпуска. Настроение на 0.