В статье описан процесс регистрации базы данных в BDE из программы.
Для доступа к BDE будем использовать компонент Session (вкладка BDE на
панели компонент). Поместим его на форму, пусть это будет Session1.
Положим на форму также компонеты Table, DataSource и DBGrid.
1. Простая регистация базы данных (алиаса)
Для добавления стандартного алиаса можно воспользоваться методом
AddStandardAlias(Name, Path, DefaultDriver)
объекта Session1, где Name - имя алиаса, Path - физический путь к базе данных, DefaultDriver - тип базы данных.
Для стандарного алиаса DefaultDriver может быть трех типов: Paradox, DBASE, ASCIIDRV. Перед запуском метода AddStandardAlias должно быть определено значение SessionName.
Пример:
Session1.SessionName:='init'; Session1.AddStandardAlias('GamesAlias', 'c:new_bd', 'PARADOX'); Table1.DatabaseName:='GamesAlias'; Table1.TableName:='games.db'; Table1.Active:=True;
|
2. Регистация базы данных (алиаса)
Регистарция базы данных в BDE производится методом AddAlias(Name, Driver, List)
объекта Session1, где Name - имя алиаса, Driver - используемый драйвер БД, List - список параметров.
Вот пример кода, выполняющего действия, аналогичные описанным в пункте 1.
var List: TStringList; ... Session1.SessionName:='init'; List := TStringList.Create; List.Add('PATH=c:new_bd'); List.Add('DEFAULT DRIVER=paradox'); Session1.AddAlias('GamesAlias', 'STANDARD', List); List.Free; ... Table1.DatabaseName:='GamesAlias'; Table1.TableName:='games.db'; Table1.Active:=True;
|
3. Удаление базы данных (алиаса) из BDE
Здесь все просто, запускаем метод Alias с указанием имени алиаса.
Session1.Alias('GamesAlias');
|
Проверить, существует ли интересующий нас алиас можно с помощью методa IsAlias.
Session1.IsAlias('games1');
|