Советы по Delphi

       

Информация о псевдонимах BDE


Как через конфигурацию IDAPI получить физический каталог расположения базы данных, зная ее псевдоним?

Обратите внимание на метод GetAliasParams класса TSession.

Возвращенная строка будет содержать искомый путь.

Я пользуюсь следующей функцией:

uses DbiProcs, DBiTypes;

function GetDataBaseDir(const Alias : string): String;
(* Возвращает каталог расположения базы данных по заданному псевдониму
(без обратного слеша) *)var
sp : PChar;Res : pDBDesc;begin
tryNew(Res);sp := StrAlloc(length(Alias)+1);StrPCopy(sp,Alias);if DbiGetDatabaseDesc(sp,Res) = 0then Result := StrPas(Res^.szPhyName)else Result := '';finallyStrDispose(sp);Dispose(Res);end;end;
[000036]



Содержание раздела