ExtractFilePath

[subsonic]

Как синтаксически верно использовать ExtractFilePath?

[Yurk@]

Например так:

LocFile:=ExtractFilePath(Application.ExeName);

[Alar]

Функция ExtractFilePath извлекает из FullFileName подстроку пути.

Это часть полного имени файла включая конечный \ перед именем файла.

var
  fullFileName : string;

begin
  // Установка полного имени файла с диском и путем
  fullFileName := 'C:\Program Files\Borland\Delphi7\Projects\Unit1.dcu';


  ShowMessage(ExtractFilePath  (fullFileName));

end;

http://delphibasics.ru/ExtractFilePath.php

[mihali4]

Сообщение от subsonic

Как синтаксически верно использовать ExtractFilePath?

Самый простой и самый верный способ узнать это для любого неизвестного выражения (или в случае внезапного приступа забывчивости) :
1. В любом свободном месте модуля пишем - ExtractFilePath
2. Ставим текстовый курсор где-нибудь внутри написанного
3. Аккуратно и не торопясь нажимаем заветную кнопу F1
4. Получаем нечто вроде:

Delphi Object and Component Reference
ExtractFilePath function

See also Delphi example C++ example
___________________________________ ________________
Returns the drive and directory portions of a file name.

Unit
SysUtils

Category
file name utilities
Delphi syntax:
function ExtractFilePath(const FileName: string): string;

Что самое важное - получаем самостоятельно и именно для своей версии Дельфи...

[honor]

Подскажите пожалуйста, как сделать путь к файлам относительно директории БД?

[Stilet]

А где эта директория лежит, в папке где программа?
ТОгда Extractfilepath(paramstr(0))+'/ПАпка с базами/'

[Alter]

Сообщение от Stilet

А где эта директория лежит, в папке где программа?
ТОгда Extractfilepath(paramstr(0))+'/ПАпка с базами/'

Вообще-то правильнее будет так:

Extractfilepath(paramstr(0))+'Папка какая-то\имя файла'