подскажите как добавить в слой свой запрос к бд, я пробовал таким образом, не работает (
db.Open(FActiveLayer.BaseName);
if not db.Queries.FindItemByName(zbFullName, 'GetListOfObjects', qs) then
begin
qs := db.Queries.AddNew(zbqtSqlQuery, 'GetListOfObjects');
end;
db.Open(FActiveLayer.BaseName);
if not db.Queries.FindItemByName(zbFullName, 'GetListOfObjects', qs) then
begin
qs := db.Queries.AddNew(zbqtSqlQuery, 'GetListOfObjects');
end;