Определение типа базы данных

Советы » Компоненты и Базы данных » Определение типа базы данных

"Могу ли я при помощи объекта 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

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com