IQuery.Database

Синтаксис

Database: IDatabase;

Описание

Свойство Database определяет базу данных, в которой хранится запрос.

Пример

Для выполнения примера предполагается наличие в репозитории базы данных с идентификатором "BD".

Sub Main;

Var

MB: IMetabase;

CrInf: IMetabaseObjectCreateInfo;

MObj: IMetabaseObject;

Query: IQuery;

Begin

MB := MetabaseClass.Active;

CrInf := Mb.CreateCreateInfo;

CrInf.ClassId := MetabaseObjectClass.KE_CLASS_QUERY;

CrInf.Id := "New_Query";

CrInf.Name := "New_Query";

CrInf.Parent := Mb.Root;

MObj := Mb.CreateObject(CrInf).Edit;

Query := MObj As IQuery;

Query.Database := Mb.ItemById("BD").Bind As IDatabase;

Query.Sql := "SELECT * FROM Table_1";

MObj.Save;

End Sub Main;

После выполнения примера в корневом каталоге репозитория будет создан новый Запрос. При выполнении данного запроса будет выполняться выборка данных из таблицы "Table_1".

См. также:

IQuery