Проверяем — существует ли файл на Delphi
Нам поможет функция FileExists. Она проверяет наличие искомого файла, и функция возвращает — True, если он существует и False — если он отсутствует.
В качестве примера, возьмём какой-либо файл и запомним адрес директории его предполагаемого размещения. Допустим, возьмём один из своих аудио файлов — Мелодия.wav и скопируем его на диск C:/
Далее:
1) Кидаем на форму компонент Button1 и в событии OnClick прописываем следующее:
|
1 2 3 4 5 6 7 8 9 10 11 |
begin if FileExists(AnsiString('C:/Мелодия.wav')) then //AnsiString - позволяет содержать последовательность //символов, подобно предложениям... begin ShowMessage('Файл существует'); end else begin ShowMessage('Файл отсутствует'); end; |