Home

Page 124
Page 124
background image

Система

Перед операциями над файлами и директориями желательно убедиться в их

существовании. Для того чтобы узнать, существует ли файл, можно восполь-
зоваться следующей функцией:

 или полный путь к файлу');

Если файл существует, то функция вернет true, иначе — false.

Узнать о существовании директории можно с помощью следующей функции:

 или полный путь к директории' );

Если директория существует, то

 вернет true, иначе — false.

Вот небольшой пример использования описанных функций:

begin

if

 then

end;

В этом примере сначала изменяется текущая директория на корень диска С.
После этого происходит проверка: если существует файл autoexec.bat, то он

удаляется из текущей директории.

Использовать данные функции Delphi очень просто, но они имеют слишком

мало возможностей и среди них нет хорошей функции для копирования и

перемещения файлов. Среди справки Delphi можно найти описание функ-
ций копирования и перемещения, которые можно использовать в
проектах. Для этого нужно только добавить их в свой проект.

procedure

 string);

var

Source, Dest: Integer;

 Integer;

Destination:

const

ChunkSize: Longint  8192;

begin

Destination

if

 faDirectory) then

begin

Len


Copyright © 2020 Файлообменник files.d-lan.dp.ua

Использование любых материалов сайта возможно только с разрешения автора.