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

Вниз

Как при сохранении файла проверить наличие файла с этим же именем   Найти похожие ветки 

← →
Jus   (2004-09-30 00:33) [0]

Я например сохраняю файл
var i:integer;
AssignFile(saves,"save"+IntToStr(i)+".txt");
Rewrite(Save);
Write(Save,{не важно});
CloseFile(Save);

А как мне сделать, чтоб программа сначало проверила, есть ли уже файл "save0.txt"?
Если такой файл уже есть то i:=i+1, ну вы надеюсь поняли о чём я?

---

← →
Defunct ©   (2004-09-30 00:48) [1]

if FilesExists(<имя файла>) tnen I:=I+1;

---

← →
GanibalLector ©   (2004-09-30 00:48) [2]

if FileExists(FileName) then ...

---

← →
GanibalLector ©   (2004-09-30 00:48) [3]

Не успел...

---

← →
Jus   (2004-09-30 00:53) [4]

> GanibalLector ©   (30.09.04 00:48) [3]
> Не успел...

Эхх...:)

> Defunct ©   (30.09.04 00:48) [1]


> GanibalLector ©   (30.09.04 00:48) [2]

Спасибо!

---

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

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

Наверх

Память: 0.44 MB
Время: 0.049 c