Текущий архив: 2011.02.13;
Скачать: CL | DM;

Вниз

Текстовые файлы   Найти похожие ветки 

← →
faustpatron13 ©   (2010-11-07 19:47) [0]

Подскажите пожалуйста, что делает этот блок???

{$I-}
Reset(f);
if(IOResult <> 0) then
ReWrite(f);
{$I+}
ReWrite(f2);

---

← →
Anatoly Podgoretsky ©   (2010-11-07 20:01) [1]

> faustpatron13  (07.11.2010 19:47:00)  [0]

Создаются два файла

---

← →
Юрий Зотов ©   (2010-11-07 20:04) [2]

Пытается открыть файл на чтение, а если это не получается, то открывает его же на запись.

Последняя строчка относится уже к другому файлу - пытается открыть его на запись.

---

← →
faustpatron13 ©   (2010-11-07 20:04) [3]

и всё?

---

← →
Юрий Зотов ©   (2010-11-07 20:14) [4]

И все. Подробности есть в справке: см. разделы Reset, Rewrite и Compiler options.

---

← →
faustpatron13 ©   (2010-11-07 20:23) [5]

Хорошо, спасибо за помощь!

---

Страницы: 1 вся ветка

Текущий архив: 2011.02.13;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.011 c