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 -