PostHeaderIconDelphi. Функция ExtractFileDrive ( const FileName: string ): string;

Функция ExtractFileDrive ( const FileName: string ): string;

Модуль: SysUtils

Описание
Функция возвращает имя диска, извлеченное из полного имени файла FileName. Если указанное имя файла не содержит имя диска, то функция возвращает пустую строку. Для имени в UNC формате возвращается строка в формате '\\<имя сервера>\<имя ресурса>'.

Пример
var
   S: string;
begin
...
   S:= ExtractFileDrive( 'C:\DIR1\myfile.zzz');   //S:= 'C:'
...
end;

 
Copyright © 2007-2010 IsIProg.ru. All Rights Reserved.