Считать файл из нескольких колонок

[archerix]

Здравствуйте, народ.

Подскажите новичку, как проще решить типовую задачку - считать из файла несколько колонок чисел? Пусть для простоты две. Как считать строчку за строчкой, я понимаю.

while not Eof(F) do
begin
Readln(F, S);
end;
CloseFile(F);

Дальше нужно парсить полученные строки или есть возможность сразу получать в две переменные?

[evg_m]

http://www.delphibasics.ru/Read.php

[archerix]

Там как записывать в несколько колонок, а вот как считывать, пока неясно Понятно, что можно взять строку и распотрошить ее на кусочки между пробелами - но может, можно проще?

[archerix]

var
i1, i2 : Integer;

...

while not Eof(F) do
begin
 Readln(F, i1, i2);
 Writeln(i1, '        ', i2);
end;

В целые переменные вроде читает целые числа из файла.

[NetSpace]

вот, пока в ВУЗе учился, этот способ чтения файла не нравился

Readln(F, i1, i2);

а если подсунут файл, где в строке не 2 , а 1 или 3, 4....9 переменных записано?
пришёл к варианту: посимвольное считывание, сшивание в одну строку и потом уже искать символы перевода в строку #13#10 и разбиение на строки.

[archerix]

Мне всегда было заранее известно, сколько колонок в файле и что в них записано

[northener]

Сообщение от NetSpace

вот, пока в ВУЗе учился, этот способ чтения файла не нравился

Readln(F, i1, i2);

а если подсунут файл, где в строке не 2 , а 1 или 3, 4....9 переменных записано?

Две переменных прочитает и перейдет к следующей строке. И ничего страшного. Это же Compiler Magic.

[Pavia]

archerix
Используйте read(i); вместо readln;

NetSpace

Сообщение от NetSpace

а если подсунут файл, где в строке не 2 , а 1 или 3, 4....9 переменных записано?
пришёл к варианту: посимвольное считывание, сшивание в одну строку и потом уже искать символы перевода в строку #13#10 и разбиение на строки.

Я сделал хитрее. LR(1)-парсер. Завёл сигналы и слоты. Если я читаю число, а встречаю NL, то сигнал посылает в слот сообщение о ошибке.

[archerix]

Сообщение от Pavia

archerix
Используйте read(i); вместо readln;

Все это очень хитро звучит. Меня интересует просто считать записанные в несколько колонок в текстовый файл данные, количество колонок и тип данных в них заранее известны

[northener]

Сообщение от Pavia

Используйте read(i); вместо readln;

Зачем? Не верите Паскалевскому/Дельфийскому компилятору? Как же вы вообще до сих пор его используете?