Пользователь

Добро пожаловать,
Регистрация или входРегистрация или вход
Потеряли пароль?Потеряли пароль?
Ник:
Пароль:
Меню сайта
Главная Главная
АккаунтАккаунт
ПользователиПользователи
ОпросыОпросы
Поиск по сайтуПоиск по сайту
Новости RSSНовости RSS
ФорумФорум
Отправить другуОтправить другу
Связаться с намиСвязаться с нами


Книги по программированиюКниги
Учебники и руководстваСамоучители
Каталог софтаКаталог софта
Исходники программИсходники
КомпонентыКомпоненты
Обработки 1СОбработки 1С
CMS-центрCMS-центр
Шаблоны для сайтовШаблоны сайтов
Наборы иконокНаборы иконок
Статьи и обзорыСтатьи и обзоры
Вопросы и ответыВопросы и ответы
СкриптыСкрипты
Статьи участниковНетематичное

Ваше мнение
Какой браузер Вы предпочитаете?

Internet Explorer
Mozilla Firefox
Opera
Netscape
Chrome
Другой


Результаты
Другие опросы

Всего голосов: 1673
Комментарии: 10

Наши партнеры



Статистика




Programming books  Download software  Documentation  Scripts  Content Managment Systems(CMS)  Templates  Icon Sets  Articles  Contacts  Voting  Site Search




Статьи и обзоры

ГлавнаяЛучшиеПопулярныеСписокДобавить


Информация о псевдонимах BDE
Статьи по объектно-ориентированному программированию на языке Pascal и в среде программирования Delphi. Примеры работающего кода, тексты компонентов и классов, советы мастеров. Как через конфигурацию IDAPI получить физический каталог расположения базы данных, зная ее псевдоним? Обратите внимание на метод GetAliasParams класса TSession. Возвращенная строка будет содержать искомый путь.



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

Код
uses DbiProcs, DBiTypes;

function GetDataBaseDir(const Alias : string): String;
(* Возвращает каталог расположения базы данных по заданному псевдониму

(без обратного слеша) *)
var

sp : PChar;
Res : pDBDesc;
begin

try
New(Res);
sp := StrAlloc(length(Alias)+1);
StrPCopy(sp,Alias);
if DbiGetDatabaseDesc(sp,Res) = 0
then Result := StrPas(Res^.szPhyName)
else Result := '';
finally
StrDispose(sp);
Dispose(Res);
end;
end;


    Разместил: admin | | Прочитано: 36726 | | Распечатать



Нет комментариев. Почему бы Вам не оставить свой?
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.
Внимание! Если у вас не получилось найти нужную информацию, используйте рубрикатор или воспользуйтесь поиском


.


Статьи и обзоры Delphi и TurboPascal Информация о псевдонимах BDE Как через конфигурацию IDAPI получить физический каталог расположения базы данных зная ее псевдоним Обратите внимание на метод GetAliasParams класса TSession Возвращенная строка будет содержать искомый путь пользуюсь следующей функцией Кодuses DbiProcs DBiTypes function GetDataBaseDir const Alias string String Возвращает по заданному псевдониму без обратного слеша PChar pDBDesc begin StrAlloc length StrPCopy DbiGetDatabaseDesc