ReadLine() до конца и в масив

[ArtemkA]

Доброго времени суток )

подскажите плиз как полностью прочитать файл в массив функцией ReadLine

допустим есть файл со строками:

строка 1
строка 2
строка 3
...
строка n

и нужно чтобы функция прочитала все строки и занесла значения в переменную reads$

точно помню что делал это все раньше, но никак немогу вспомнить как я просто забрасывал блитц на пол года

[не-я]

bla$[1000]

for i=1 to eof(file)
bla[i]=readline(file)
next

[HolyDel]

да, да. и здравствуй MAV, на файле с более чем 1000 строк.
ну и скокато памяти тратится впустую, если в файле меньше 1000 строк.

вообще - можно смотреть в сторону типов.

[impersonalis]

В вопросе речь то про массив, то про строку.
Если нужно склеить всё в строку, то можно или побайтово читать файл, либо конкатенировать нвовь прочитанную строку к строке-аккумулятору.

[ArtemkA]

Спасибо вам. Блин совсем забыл про Eof мне нужно было только это, а на счет массива это я уж так к слову. Сам уж тут разберусь как нибудь

[impersonalis]

eof порой опасно. Для анализа потока, в котором EndOfFile безусловно команда завершения информации - да, в бинарных файлах - лучше в качестве критерия использовать размер файла FileSize (filename$)