Разместите нашу кнопку!

Новые статьи:

Programming articles

Создание сайтов на шаблонах

Множество вариантов работы с графикой на канве

Шифруем файл с помощью другого файла

Перехват API функций - Основы

Как сделать действительно хороший сайт

Создание почтового клиента в Delphi 7

Применение паскаля для решения геометрических задач

Управление windows с помощью Delphi

Создание wap сайта

Операционная система unix, термины и понятия

SQL враг или друг

Возникновение и первая редакция ОС UNIX

Оптимизация проекта в Delphi

Ресурсы, зачем нужны ресурсы

Термины программистов 20 века

Советы по созданию собственного сайта с нуля

Шифруем файл с помощью пароля

Фракталы - геометрия природы

Crypt - Delphi программа для шифрования

Рассылка, зачем она нужна и как ее организовать?

Учебник по C++ для начинающих программистов

Уроки для изучения ассемблера

Загадочный тип PCHAR

Средства по созданию сайтов

Операторы преобразования классов is и as

Borland Developer studio 2006. Всё в одном

Создание базы данных в Delphi, без сторонних БД


Software engineering articles



ProcessPath

разделяет полное файловое имя на адрес, каталог и имя файла

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

Описание:

    Delphi процедура ProcessPath разделяет полное файловое имя на 3 части: адрес файла, каталог в котором файл находиться, и имя файла.

Пример кода:

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

begin
   // Ask the user to select a file
   if PromptForFileName(selectedFile)
   then
   begin
      // Display this full file/path value
      ShowMessage('Selected file = '+selectedFile);

      // Split this full file/path value into its constituent parts
      ProcessPath(selectedFile, drive, path, fileName);
      ShowMessage('drive = '+drive);
      ShowMessage('path = '+path);
      ShowMessage('fileName = '+fileName);
   end;
end;

Результат выполнения:


{ The user selects C:\Files\data.txt and hits OK }

Selected file = C:\Files\data.txt
drive = C
path = \Files
filename = data.txt