Массив [0..0] ов байт Опции

[Билли Боб]

Когда указываю этот массив в своей процедуре, то возникает ошибка 200 на процедуре BlockRead,
а если указать масссив в основной программе, ошибки нет. Что не так?

[IUnknown]

Показывай код процедуры, что-то там не так. Вот такая процедурка:

procedure p(var f : file);
var buffer: array[0 .. 0] of byte;
begin
   writeln(sizeof(buffer));
   while not eof(f) do
   begin
      blockread(f, buffer, 1);
      writeln(buffer[0]);
   end;
end;

совершенно нормально отрабатывает, безо всяких ошибок. Да, файл открывался через reset(f, 1);