Работа с установками BDE
Метод procedure GetAliasNames(List: TStrings); очищает список List и затем заносит в него список псевдонимов БД , определенных в BDE.
Пример:
Session.GetAliasNames(ListBoxl.Items) ;Метод procedure GetAliasParams(const AliasName: string; List: TStrings); очищает список List и затем помещает в него параметры псевдонима AliasName.
Пример:
var TekAllias : String;
Session.GetAliasParams(TekAllias, ListBox2.Items);
Примеры возвращаемых результатов:
SERVER NAME=C:\Program
Files\Borland\IntrBase\EXAMPLES\EMPLOYEE.GDB
USER NAME=SYSDBA
OPEN MODE=READ/WRITE
SCHEMA CACHE SIZE=8
LANGDRIVER=
SQLQRYMODE=
SQLPASSTHRU MODE=SHARED AUTOCOMMIT
SCHEMA CACHE TIME=-1
PATH=d:\book\data
DEFAULT DRIVER=PARADOX
ENABLE BCD=FALSE