чтение файла

[Arteom]

Подскажите пожалуйста вот по какому вопросу: нужно считывать по байтно файл и записывать все это в массив, чтобы потом можно было в цикле гонять каждый байт. Что посоветуете?

[Showy]

Писал сразу не проверял может где-то неправильно
вот так:
.....................
var
file:TFileStream;
count:integer;
buffer:array[0..1023] of byte;
begin
file:=TFileStream.Create('MyFile.ex e',fmopenread);

repeat
count:=file.read(buffer,sizeof(buff er));
//тут записываешь в массив
until count<1024;

file.free;
end;
................
или так
.....................
var
file:TFileStream;
count:integer;
b:byte;
begin
file:=TFileStream.Create('MyFile.ex e',fmopenread);

repeat
file.read(b,sizeof(buffer));
//тут записываешь в массив
until file.position<=file.size;

file.free;
end;
................

[Arteom]

а нельзя как-нибудь так, чтобы заводился массив с таким же количеством элементов, сколько будет считано из файла байт?

[Showy]

Насчет создания массива который будет равен рамером размеру файла не знаю как, не пробовал

[Stilet]

Сообщение от Arteom

а нельзя как-нибудь так, чтобы заводился массив с таким же количеством элементов, сколько будет считано из файла байт?

Можно :

buffer:array of byte; // Динамический
....
SetLength(buffer,file.size);
count:=file.read(buffer,sizeof(buff er));
....

Только ты зря выбрал для переменной файла такое имя.

[Arteom]

спасибо всем кто поучаствовал, я вроде разобрался

[zetrix]

мда... BlockRead, BlockWrite забыли что ли?