|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
06.07.2008, 20:38 | #1 |
Новичок
Джуниор
Регистрация: 06.07.2008
Сообщений: 2
|
Помогите определить, в чем ошибка!
Код:
i:=i+1; read(f1,a[i]); {Вот здесь Паскаль ругается} ?? |
06.07.2008, 20:50 | #2 |
Форумчанин
Регистрация: 03.01.2008
Сообщений: 102
|
Если я не ошибаюсь то считать из текстового файла переменную такого типа нельзя. Можно считывать только строку.
Теория без практики мертва и бесплодна, практика без теории невозможна и пагубна.
|
06.07.2008, 22:22 | #3 |
Пользователь
Регистрация: 02.05.2007
Сообщений: 53
|
А что за ошибка хоть? Если ошибка в названии файла, то измени filename:=filename+'.txt';
А может он затрудняется считать твой univer?(ТОЧНО НЕ ЗНАЮ, С ЗАПИСЯМИ НИКОГДА НЕ РАБОТАЛ-ГАРАНТИИ НЕТУ) |
06.07.2008, 22:24 | #4 |
Пользователь
Регистрация: 02.05.2007
Сообщений: 53
|
Чувак, я проверил - Я ОКАЗАЛСЯ ПРАВ! ОН НЕ ЧИТАЕТ RECORD. ПРОВЕРЯЛ ВО FP
|
06.07.2008, 22:24 | #5 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Да нет, это просто пагубные последствия использования глобальных переменных ;-(
чему равно i в момент вызова процедуры fail2 ?? думаю, что n ... сделайте присвоение 0 в i перед циклом чтения: Код:
перед циклом |
06.07.2008, 22:28 | #6 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Цитата:
т.е. надо вместо f1:text надо написать f1:file of univer |
|
06.07.2008, 22:33 | #7 |
Пользователь
Регистрация: 02.05.2007
Сообщений: 53
|
Про твою первую ошибку он сказал бы когда он уже компилил программу, Serge_Bliznykov, и вылетел бы нафиг. А вот про file of univer первый раз слышу. Наверное я - отсталый человек.
|
06.07.2008, 22:43 | #8 |
Новичок
Джуниор
Регистрация: 06.07.2008
Сообщений: 2
|
Ребята, прикол в том, что если объявить файловую переменную как f1:file of univer, то прога тож не работает!
А про глобальные переменные, да, мой косяк- че то не подумал! И если файл типизированный, то не получается создать шапку как бы таблицы в файле! Последний раз редактировалось Alex21; 07.07.2008 в 17:06. Причина: подряд больше 2х не постить! |
06.07.2008, 22:49 | #9 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Похоже программа склеена из двух кусков разных программ, поэтому с файлами сплошная неразбериха. При чем здесь модуль DOS?.
Короче выкладывай полное условие задачи, завтра будем разбираться. |
06.07.2008, 23:38 | #10 | ||
Delphi/C++/C#
Участник клуба
Регистрация: 29.10.2006
Сообщений: 1,972
|
Цитата:
Цитата:
Решайте: типизированные или текстовые файлы. Конечно же типизированные файлы вы в блокноте не прочитаете, увидите абракадабру. |
||
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите определить ip адрес при http соединении | Валерий | Работа с сетью в Delphi | 4 | 26.10.2010 13:01 |
Помогите определить метод двухстороннего шифрования | Esuol | Общие вопросы Delphi | 7 | 21.06.2010 10:53 |
Помогите определить скрипт | Антон171 | JavaScript, Ajax | 1 | 03.10.2008 18:15 |
Среди 20 введёных чисел определить чётные, распечатать их, определить min | Spade | Помощь студентам | 4 | 15.06.2008 18:39 |
Помогите определить макс кол цветов картинки 32x32 пикс объёмом 512 байт | www_2008 | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 13.05.2008 20:25 |