Меню сайта
Мини-чат
Чтобы добавить сообщение, необходимо авторизоваться.
Главная » Статьи » Не стандартные примеры на Delphi » Базы Данных

Определение типа базы данных
"Могу ли я при помощи объекта Tdatabase узнать с каким типом базы данных он связан?"


    {uses должен включать в себя db, dbitypes, dbiprocs }

procedure TForm1.FormCreate(Sender: TObject);
var
rDB: DBDesc ;
begin
{ Первый аргумент DbiGetDatabaseDesc - имя псевдонима базы данных
типа PChar }
Check(DbiGetDatabaseDesc('IBLOCAL', @rDB)) ;
{ член szDbType структуры DBDesc содержит информацию о типе
базы данных и имеет тип PChar }
ShowMessage( 'Database имеет тип: ' + StrPas(rDB.szDbType) ) ;

{ Совет: Если вам просто необходимо узнать -
SQL server это или нет, используйте свойсто TDatabase
IsSQLBased }
end;

OAmiry/Borland 

Категория: Базы Данных | Добавил: DelphiAiX (20.05.2012)
Просмотров: 488 | Рейтинг: 0.0/0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]