| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа с файлом [D5]
kserg@ukr.net © (2002-08-20 16:34:00)Привет.
Нижеследующая конструкция для перезаписи тхт-файла
при уже открытом файле вызывает ошибку I/O 32
AssignFile(F,"ExportToExcel.xls");
ReWrite(F);
Как проверить неоткрыт ли этот файл или может подскажите более надежный алгоритм работы с файлом.
спасибо
Anatoly Podgoretsky (2002-08-20 19:23:00) [1]try except end;
Но лучше выбрать другой метод доступа к файлу, который позволяет устанавливать методы доступа, вероятнее ни один из них не сработает, если открыто Экселем
BOA_KAA (2002-08-20 19:11:00) [2]Вариянт:
{I-}
AssignFile(F,"ExportToExcel.xls");
ReWrite(F);
{I+}
if IOResult<>0 then дын-дын-дын //ежели нет ошибки
Проверено, даже в Turbo Paskal"е работает:-)))
Вроде нигде не наврал...:-))
Игорь Шевченко (2002-08-20 16:42:00) [3]Вот I/O error 32 и служит признаком работы с уже открытым файлом.
Надежный алгоритм: try ... except ... end;
| |
