Форум: "Начинающим";
Текущий архив: 2006.04.23;
Скачать: [xml.tar.bz2];

Вниз

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

← →
align   (2006-04-05 13:58) [0]

Скажите пожалуйста, что не нравится дельфи7:

Если файл существует(if FileExists("C:\otkl.log")), то
 AssignFile(txtfile,"C:\otkl.log");
 Append(txtfile);
 Writeln(txtfile,"");
и все хорошо

а если файла нет, то я делаю так
 Filecreate("C:\otkl.log");
 AssignFile(txtfile,"C:\otkl.log");
 Append(txtfile);
 Writeln(txtfile,"");

и результат - файл создался, но данные не внеслись и выдает I/O 32.
Подскажите пожалуйста!

---

← →
Плохиш ©   (2006-04-05 14:01) [1]

Во втором случае rewrite. Пора почитать чего-нибуть.

---

← →
icWasya ©   (2006-04-05 14:19) [2]

а если файла нет, то я делаю так
AssignFile(txtfile,"C:\otkl.log");
rewrite(txtfile);
Writeln(txtfile,"");

---

← →
align   (2006-04-05 16:05) [3]

А, спасибо, вспомнил, точно была такая команда, извените...

---

← →
TUser ©   (2006-04-05 19:39) [4]

http://www.delphikingdom.ru/lyceum/seminar.asp?ID=2

---

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

Форум: "Начинающим";
Текущий архив: 2006.04.23;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.012 c