Error 208, перегрузка Опции

[Tan]

Пытаюсь прочитать записи в динамичсекую память, спецификация :

Const Max = 100;
type
  MyData = array [1..Max] of ^MyRec;
  MyRec = record
    pole      : string[12];
    pole2     : string[12];
    pole3     : string[13];
    pole4     : string[11];
    pole5     : integer;
    pole6     : integer;
  end;
WorkData : MyData;

Вот из - за этого цикла вылезает 208 ошибка перегрузки (пытаюсь читать 40 записей с файла). При этом если не исользовать динамичекую память, то всё идеально работает, но как только этот цикл, то :

for i:=1 to filesize(fails) - 1 do 
 begin
     read(file,rec);
     Workdata[i]^:=rec;
 end;

Спасибо.

Добавлено через 9 мин.
Ошибка возникает даже тогда когда я просто пытаюсь присвоить любое значения записи и даже без цикла :

Workdata[i]^:=rec;

Может что - то не так в спецификации ?

Сообщение отредактировано: Tan - 15.04.2007 14:28