Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];




Вниз

Поиск файла 


Socol   (2002-01-18 07:14) [0]

Здраствуйте!
Каким образом можно проверить есть ил файл на диске?
Если есть то переменная а =1
Если нет то 0
Спасибо всем кто ответил!



mart   (2002-01-18 08:05) [1]

Sysutils

Category

file management routines

function FileExists(const FileName: string): Boolean;

Description

FileExists returns True if the file specified by FileName exists. If the file does not exist, FileExists returns False.



Dmitry-corp   (2002-01-18 11:06) [2]

var a: integer;
begin
if FileExists("C;\123.txt")= True then
a:=1;
else
a:=0;
end;



Polevi   (2002-01-18 11:25) [3]

a:=Integer(FileExists("C;\123.txt"));



Ынс   (2002-01-18 12:00) [4]

LPSTR FindFileInTree(LPSTR szFile, LPSTR szDir, LPSTR szBuf, int cbBuf);

FindFileInTree searches for the specified file in a directory and its subdirectories.

Arguments

szFile

Specifies the name of the file you are trying to locate.

szDir

Specifies the top-level directory of the tree structure you want to search.

szBuf

Points to the destination buffer that will receive the path string.

cbBuf

Length, in bytes, of the destination buffer.

Return Value

The return value is the full path of the first instance of the file. If the file isn"t found, the return value is an empty string.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.018 c
14-8993           savva                 2001-12-17 10:37  2002.02.04  
Интересно, а адолго ли умер сервер на Newmail.ru??


14-8973           Fay                   2001-12-10 06:50  2002.02.04  
Что означает слово


1-8949            PEC                   2002-01-18 14:34  2002.02.04  
Привет народ !!!


1-8881            VladimirL             2002-01-15 18:47  2002.02.04  
Во время работы не меняются данные на форме


3-8802            RoadRunner            2002-01-08 21:29  2002.02.04  
Доступ к Paradox c паролем