Форум: "Основная";
Текущий архив: 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.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.004 c