Главная страница
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.023 c
3-83853
explorer
2003-05-28 13:16
2003.06.26
Обработка ошибки хранимой процедуры


14-84604
Marser
2003-06-06 15:59
2003.06.26
Сон разума


1-84296
Alex-21
2003-06-11 23:07
2003.06.26
Курсор (каретка)


3-83994
DNK
2003-05-30 13:18
2003.06.26
Параметры с одинаковыми именами (ADO)


3-84022
Александр Николаевич
2003-05-30 12:50
2003.06.26
UPDATE НА БОЛЬШОЙ ОБЪЕМ ДАННЫХ В INTERBASE