Procedure ReadBytes(fl: string; var a: array of byte);
begin
a := System.IO.File.ReadAllBytes(fl);
end;
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.