IPB
ЛогинПароль:

> Проблема в FPC при работе с файлами, При попытке открытия несуществующего файла программа закрывается с код
AlexSun
сообщение 27.11.2011 1:11
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 10
Пол: Мужской
Реальное имя: Александр

Репутация: -  0  +


Код:
assign(f,fname);
{I-}
reset(f);
{I+}
if IOResult <> 0 then begin
rewrite(f);

Если файла нет, на строке с reset(f) программа вылетает с exitcode = 2.
Ошибка не в программе, со старыми исходниками дела так же.
Переустановка (после полного удаления ручками) ничего не дает.
Все нормально после удаления всех файлов fp.cfg, fp.dsk, fp.ini и чего-то еще похожего что там рядом лежит, но это не решает проблему - ведь исчезают все настройки, в том числе директории включаемых файлов (прощай библиотеки).

Что за ерунда??

Добавлено через 7 мин.
Виновата конфигурация.
Сношу конфиг файлы - все работает как надо.
Выложите кто свои 100% рабочие?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
TarasBer
сообщение 13.01.2012 9:25
Сообщение #2


Злостный любитель
*****

Группа: Пользователи
Сообщений: 1 755
Пол: Мужской

Репутация: -  62  +


А если программа изначально компилируется при {$I-}? То получается, что нарушаем как раз.


--------------------
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
IUnknown
сообщение 13.01.2012 11:33
Сообщение #3


a.k.a. volvo877
*****

Группа: Пользователи
Сообщений: 1 013
Пол: Мужской

Репутация: -  627  +


Цитата(TarasBer @ 13.01.2012 8:25) *
А если программа изначально компилируется при {$I-}
, то программист - ССЗБ. Я имел в виду:
Цитата(prog.pdf)
1.1.36 $I or $IOCHECKS : Input/Output checking
The {$I-} or {$IOCHECKS OFF} directive tells the compiler not to generate input/output check-
ing code in the program. By default, the compiler generates I/O checking code.


К тому же теперь, с возможностью отлова исключения EInOutError, этот ключ потерял первоначальный смысл, раньше без его отключения нельзя было обойтись, теперь - можно.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
2 чел. читают эту тему (гостей: 2, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 8.09.2025 7:52
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"