[Urahaar]

эм... немного непонял назначения

n:=filesize(f);
inc(i);
if i>n then i:=1;
seek(f,i);

и почемуто выдает ошибку на

read(f,s);

когда пытаюсь прочитать файл=(