![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#3
|
|||
|
|||
![]() или, если хочется именно в таймере, то так
вместо Код:
Rewrite(outfile); Код:
{$I-} // выключить Exception при ошибках ввода-вывода Append(outfile); // открыть файл для дописывания if IoResult <>0 then // если не получилось Rewrite(outfile); // то создать новый файл {$I+} // включить обратно Exception при ошибках ввода-вывода |