Delphi-Help

Описание

procedure ProcessPath ( const FullName : string; var Drive : Char; var Dir : string; var FileName : string ) ;

Процедура ProcessPath разбивает полное имя файла FullName на части: Диск(Drive), Каталог(Dir) и Имя файла(FileName).

Пример кода

var
selectedFile   : string;
drive          : char;
path, fileName : string;

begin
// Просим пользователя выбрать файл
if PromptForFileName(selectedFile)
then
begin
// Отображение этого полного значения файла/пути
ShowMessage('Выбранный файл = '+selectedFile);

// Разбиение этого полного значения файл/путь на непосредственно составляющие части
ProcessPath(selectedFile, drive, path, fileName);
ShowMessage('диск = '+drive);
ShowMessage('путь = '+path);
ShowMessage('имя файла = '+fileName);
end;
end;

{Пользователь выбрал C:\Files\data.txt и нажал OK}

Выбранный файл = C:\Files\data.txt
диск = C
путь = \Files
имя файла = data.txt

Примечание