Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail


Ответ
 
Опции темы
Старый 24.01.2020, 14:22   #1
archerix
Форумчанин
 
Регистрация: 13.09.2019
Сообщений: 119
По умолчанию Считать файл из нескольких колонок

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

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

Код:
while not Eof(F) do
begin
Readln(F, S);
end;
CloseFile(F);
Дальше нужно парсить полученные строки или есть возможность сразу получать в две переменные?
archerix вне форума Ответить с цитированием
Старый 24.01.2020, 16:41   #2
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 4,984
По умолчанию

http://www.delphibasics.ru/Read.php
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума Ответить с цитированием
Старый 25.01.2020, 03:17   #3
archerix
Форумчанин
 
Регистрация: 13.09.2019
Сообщений: 119
По умолчанию

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

Последний раз редактировалось archerix; 25.01.2020 в 03:46.
archerix вне форума Ответить с цитированием
Старый 25.01.2020, 04:08   #4
archerix
Форумчанин
 
Регистрация: 13.09.2019
Сообщений: 119
По умолчанию

Код:
var
i1, i2 : Integer;

...

while not Eof(F) do
begin
 Readln(F, i1, i2);
 Writeln(i1, '        ', i2);
end;
В целые переменные вроде читает целые числа из файла.

Последний раз редактировалось archerix; 25.01.2020 в 04:19.
archerix вне форума Ответить с цитированием
Старый 25.01.2020, 12:24   #5
NetSpace
Участник клуба
 
Аватар для NetSpace
 
Регистрация: 03.06.2009
Сообщений: 1,472
По умолчанию

вот, пока в ВУЗе учился, этот способ чтения файла не нравился
Код:
Readln(F, i1, i2);
а если подсунут файл, где в строке не 2 , а 1 или 3, 4....9 переменных записано?
пришёл к варианту: посимвольное считывание, сшивание в одну строку и потом уже искать символы перевода в строку #13#10 и разбиение на строки.
Программирование - это единственный способ заставить компьютер делать то, что тебе хочется, а не то, что приходится.
NetSpace вне форума Ответить с цитированием
Старый 25.01.2020, 14:47   #6
archerix
Форумчанин
 
Регистрация: 13.09.2019
Сообщений: 119
По умолчанию

Мне всегда было заранее известно, сколько колонок в файле и что в них записано
archerix вне форума Ответить с цитированием
Старый 25.01.2020, 20:32   #7
northener
ПШП
Участник клуба
 
Регистрация: 15.07.2013
Сообщений: 1,607
По умолчанию

Цитата:
Сообщение от NetSpace Посмотреть сообщение
вот, пока в ВУЗе учился, этот способ чтения файла не нравился
Код:
Readln(F, i1, i2);
а если подсунут файл, где в строке не 2 , а 1 или 3, 4....9 переменных записано?
Две переменных прочитает и перейдет к следующей строке. И ничего страшного. Это же Compiler Magic.
northener вне форума Ответить с цитированием
Старый 25.01.2020, 21:17   #8
Pavia
Лис
Старожил
 
Аватар для Pavia
 
Регистрация: 18.09.2015
Сообщений: 2,048
По умолчанию

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

NetSpace
Цитата:
Сообщение от NetSpace Посмотреть сообщение
а если подсунут файл, где в строке не 2 , а 1 или 3, 4....9 переменных записано?
пришёл к варианту: посимвольное считывание, сшивание в одну строку и потом уже искать символы перевода в строку #13#10 и разбиение на строки.
Я сделал хитрее. LR(1)-парсер. Завёл сигналы и слоты. Если я читаю число, а встречаю NL, то сигнал посылает в слот сообщение о ошибке.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
У дзен программиста программа делает то что он хотел, а не то что он написал .
Pavia вне форума Ответить с цитированием
Старый 25.01.2020, 23:56   #9
archerix
Форумчанин
 
Регистрация: 13.09.2019
Сообщений: 119
По умолчанию

Цитата:
Сообщение от Pavia Посмотреть сообщение
archerix
Используйте read(i); вместо readln;


Все это очень хитро звучит. Меня интересует просто считать записанные в несколько колонок в текстовый файл данные, количество колонок и тип данных в них заранее известны
archerix вне форума Ответить с цитированием
Старый 26.01.2020, 03:59   #10
northener
ПШП
Участник клуба
 
Регистрация: 15.07.2013
Сообщений: 1,607
По умолчанию

Цитата:
Сообщение от Pavia Посмотреть сообщение
Используйте read(i); вместо readln;
Зачем? Не верите Паскалевскому/Дельфийскому компилятору? Как же вы вообще до сих пор его используете?
northener вне форума Ответить с цитированием
Ответ

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как считать файл без расширения. С++ Nikzz Помощь студентам 3 24.10.2017 21:23
Экспорт всех колонок из ListView в .csv файл (Microsoft Excel) FleXik Общие вопросы Delphi 18 12.07.2015 21:10
Как побайтово считать файл GIF? Bubel Visual C++ 1 29.10.2011 02:23
Как побайтово считать файл GIF? Bubel Visual C++ 1 27.10.2011 11:44
Считать wav-файл С++ Skido Помощь студентам 4 30.01.2009 04:06