Проверить Файл На Существование

  • Автор темы Автор темы Lomanu4
  • Дата начала Дата начала

Lomanu4

Команда форума
Администратор
Ofline
Для проверки файла на существование на чистом winapi можно использовать следующую функцию:
Код:
Function FileEx(fl: string): boolean;
begin
  if GetFileAttributes(PChar(fl)) = DWORD($FFFFFFFF)
   then result:= false else
   result:= true;
end;
Использование:
Код:
if FileEx('c:\foldeк1\image.png') = true
   then ShowMessage('Файл существует')
   else ShowMessage('Файл не существует!');
 
Назад
Сверху Снизу