Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.26;
Скачать: CL | DM;

Вниз

Как проверить существует файл или нет!   Найти похожие ветки 

 
sagchat ©   (2003-06-14 17:50) [0]

Как проверить существует файл или нет!
Если можно кодом, а не посылайте почитать что либо!
И еще у меня Windows 98 собираюсь ставить 2000 в дельфях не чего не изменяется относительно ОС


 
Ihor Osov'yak ©   (2003-06-14 17:55) [1]

FileExists случаем не подойдет?

Зы - код:


program BlaBla;

uses
windows,
sysutils,
....


var fileName:string;

begin
fileName := чего-то там..
if not FileExists(fileName) then begin
MessageBox(0,PChar(fileName),"Error",MB_OK+MB_ICONERROR);
exit;
end;

.. чего-то делаем дальше


 
Катерина ©   (2003-06-14 22:23) [2]

Можно так:

var F : textfile; filename : string;

begin
...
AssignFile(F,filename); {$I-} reset(F); {$I+}
if ioresult <> 0 then exit;
...
CloseFile(F);
...
end;



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

Текущий архив: 2003.06.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
3-83860
Empleado
2003-05-27 12:19
2003.06.26
SQL update в одной транзакции


6-84510
mixamixa
2003-04-20 20:25
2003.06.26
Предача файлов ч/з ClientSocket & Serve


7-84766
S.P.I.R.I.T
2003-04-16 02:07
2003.06.26
Скрытие программы от ALT+TAB??????


1-84345
Кен
2003-06-09 05:37
2003.06.26
Что изменить в Дельфи, чтобы она сохраняла формы в dfm-файлы


14-84740
AlexZ
2003-05-30 07:48
2003.06.26
Проблемы с системой