DBGrid + Tree

← →
VitGun (2003-05-22 21:07) [0]

Мастера. Хелп. Есть ли в природе такой компонент, который бы осуществлял связь DBGrid и TTree, как в 1С. Т.е. У меня есть группы товаров. В дереве я выбираю соответствующую группу, а в таблице все товары этой группы отображались...Если кто знает киньте ссылку...

← →
Тих (2003-05-22 23:04) [1]

В Data узла дерева помещай какой-нить идентификатор, при нажатии на оный получай его обратно, динамически формируй SQL и шли на сервер.
Или Virtual TreeView на гугле поищи, но к датасету привязывать его придется самому, в смысле - заполнять его придется вручную
+ от 1 до 3 дней на уяснение его функционала,
довольно-таки навороченный (зато красивый и функциональный :-)контрол.

← →
Fuelfire (2003-05-23 06:28) [2]

Делаешь следующее:
Бросаешь в DataModule Query, формируешь SQL-запрос:
SELECT Goodies.ID, Goodies.Name FROM "Goodies.DB" Goodies
WHERE (Name LIKE :Name_param) ORDER BY Goodies.Name

Name_param задаешь как ftString и ptInput. А далее пишешь обработчик TreeView1Click:
DataModule.Query.Close;
If not DataModule.Query.Prepared then DataModule.Query.Prepare;
If TreeView.Items[0].Selected = true then
begin
par:="%"
end else
par:=String(TreeView1.Selected.Text) + "%";
DataModule.Query.ParamByName("Name_param").AsString := par;
DataModule.Query.Open;

В общем в этом примере по клику на node дерева по запросу выбираются все значения, содержащие название node...Просто не знаю твою реализацию, но алгоритм приблизительно такой.
P.S. Код - на скорую руку, на машине не проверен...Надеюсь не много ошибок.

← →
Nikolay M. (2003-05-23 09:43) [3]

> Fuelfire (23.05.03 06:28)

Если использовать DBTreeView для групп товаров, то это все можно сделать и автоматически. Допустим группы товаров выбираются qGroup->dsGroup, а собственно товары: qProduct->dsProduct (т.е. Query и соответствующий ему DataSource). Если товары выбирать запросом вроде
SELECT * FROM product WHERE id_group = :id_group
а группы выбираются как
SELECT id_group, name FROM group
тогда по выбору категории выбор товаров из этой категории будет производиться автоматически. Только еще qProduct.DataSource нужно сделать равным dsGroup.

DBGrid + Tree Найти похожие ветки