Скачать: CL | DM;

создание файла и запись в него   Найти похожие ветки 

← →
FIL-23 ©   (2007-01-04 11:23) [0]

в фаил который я толькочто создал программно и хочу в него записать сразуже данные, выводится ошибка мол типа фаил други занят и ты его не то что перезаписать ты даже и открыть его не можешь, код программы такой:
  if fileexists(extractfilepath(application.ExeName)+"vopros1\"+spinedit1.Text+".txt")=false
 then filecreate(extractfilepath(application.ExeName)+"vopros1\"+spinedit1.Text+".txt");
assignfile(ff,extractfilepath(application.ExeName)+"vopros1\"+spinedit1.Text+".txt");

s:=memo1.Text;
rewrite(ff);
write(ff,s);

               closefile(ff);
и еще, когда запускаю программу повторно (получается что фаил уже создан, с предыдущего запуска) то все проходит гладко. Другая подобная программа сделанная мною раньше работала без подобных глюков. Помогите разобраться в чем дело . Зарание спасибо

---

← →
Плохиш ©   (2007-01-04 11:40) [1]

> filecreate


> assignfile

"В огороде бузина, а в Киеве дядька"
Справку почитать по используемым функциям/процедурам не пробовал?

---

← →
Calibr ©   (2007-01-04 14:26) [2]

> FIL-23 ©   (04.01.07 11:23)


Лучше делай так:

assignFile(ff, <Имя файла>);
rewrite(ff);
writeln(ff, <Нужный текст или переменная>);
closeFile(ff);

Таким образом, если файла нет, то он создастся, а если есть, то существующий файл перезапишется.

---

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

Скачать: CL | DM;



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