Вниз
Скачать: CL | DM;

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

 
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 вся ветка

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



Память: 0.45 MB
Время: 0.035 c
1-1096619466
Sash
2004-10-01 12:31
2004.10.17
главная форма ровно по центру монитора


1-1096886095
strelok-47
2004-10-04 14:34
2004.10.17
Как создать OLE-объект в сонсольном приложении?


1-1096867349
_Дельфин_
2004-10-04 09:22
2004.10.17
Электронные учебники по Дельфи


14-1096438790
msguns
2004-09-29 10:19
2004.10.17
Динамо (К) - Байер 4:2 !!!


1-1096512110
oleg krechetov
2004-09-30 06:41
2004.10.17
Программа загружает процессор




   Наверх