На этом шаге мы рассмотрим компонент TIBExtract.
Этот компонент предназначен для получения так называемых метаданных - списков таблиц, индексов, хранимых процедур и тому подобных сущностей БД. Его использование достаточно просто. В свойства Database и Transaction компонента нужно поместить ссылки на соответствующие связные компоненты, после чего с помощью метода ExtractObject компонент может прочитать в свое свойство Items нужную информацию. Например, следующий обработчик покажет в многострочном текстовом поле список всех таблиц БД с указанием их определений:
procedure TForm1.Button1Click(Sender: TObject); begin IBDatabase1.Connected := True; IBExtrac11.ExtractObject(eoTable); Memo1.Lines.Assign(IBExtract1.Items); end;
Метод ExtractObject определен следующим образом:
procedure ExtractObject (ObjectType : TExtractObjectTypes;
ObjectName : String = ' ';
ExtractTypes : TExtractTypes = [ ]);
Единственный обязательный параметр ObjectType определяет вид нужных метаданных и может иметь одно из следующих значений:
- eoDatabase - получить список всех баз данных;
- eoDomain - получить список доменов;
- eoTable - получить список таблиц;
- eoView - получить список представлений;
- eoProcedure - получить список хранимых процедур;
- eoFunction - получить список внешних (пользовательских) функций;
- eoGenerator - получить список генераторов;
- eoException - получить список исключений;
- eoBLOBFilter - получить список BLOB-фильтров;
- eoRole - получить список ролей;
- eoTrigger - получить список триггеров;
- eoForeign - получить список внешних ключей;
- eoIndexes - получить список индексов;
- eoChecks - получить список проверяемых ограничений;
- eoData - получить все данные объекта ObjectName.
Параметр ObjectName определяет имя сущности. Если он опущен, будет получена информация обо всех сущностях данного вида. Параметр ExtractTypes содержит набор уточняющих флагов.
На следующем шаге мы рассмотрим компонент TIBClientDataSet.
