Программы   Загрузка Партнерство   О компании Контакты  
 
                    
  Карта Сайта   
   





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

Автор: OAmiry (Borland)

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