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

Как очистить текстовый файл?   Найти похожие ветки 

← →
picaroon ©   (2003-06-29 16:41) [0]

Существует текстовый файл. Необходимо его открыть и полностью очистить. Поможите кто чем может...

---

← →
MBo ©   (2003-06-29 16:44) [1]

assignfile
rewrite
closefile

---

← →
Palladin ©   (2003-06-29 16:46) [2]

вот это загадка...

один из способов, первый пришедший в голову...
var
f:file;
assignfile(f,"file");rewrite(f,1);closefile(f);

---

← →
DVM ©   (2003-06-29 16:57) [3]

Или удалить и создать новый с тем же именем. Чем не очистка?

---

← →
Shluz ©   (2003-06-29 18:43) [4]

можно Api CreateFile с атрибутом CREATE_ALWAYS

---

← →
Region ©   (2003-06-29 20:09) [5]

А можно еще вот как извратиться:
Загрузить в StringList, там потом
этот StringList обнулить, потом этот стринглист снова записать в файл....
Способов много.

---

← →
Ihor Osov'yak ©   (2003-06-29 21:04) [6]

2 Region © (29.06.03 20:09)
Изврат. Могу предложить и похлеще.. Но зачем изврат, если можно и по-человеески - см. Shluz © (29.06.03 18:43) или Palladin,MBO..

2 DVM © (29.06.03 16:57)

Может быть в секюрити настройках отсутствовать право на удаление..

Впрочим, я не уверен, что это не будет помехой и для методов, предложенных
Shluz,Palladin,MBO.. Если это так (а мне сейчас влом смотреть докуиентацию и эксперименты делать) - то тогда нужно открывать файл как бинарный, делать truncate и закрывать..

---

← →
Morfein ©   (2003-06-30 00:59) [7]


CloseHandle(CreateFile(pchar(FileName), GENERIC_READ, 0, nil, CREATE_ALWAYS, 0, 0));

---

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

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



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