как сделать чтоб по клику в TreeView в DBGrid

[yaskin]

Здравствуйте.
подскажите сделать чтоб по нажатию на каждую категорию в трее открывать таблицу в DBGrid.
пока делаю так

procedure TForm1.TreeClick(Sender: TObject);
begin
  Query.Active:=false;
  Query.SQL.Clear;
  Query.SQL.Add('select * from goods where cate_name ='+ tree.Selected.text );
  Query.Active:=true;
end;

но в базе есть поля с запятыми, например

Электроника, фото, связь

и соответственно выдается ошибка синтаксиса (запятая) в выражении запроса.
Поля в таблице goods в базе access: 'cate_id', 'parent_id', 'cate_name'

[Прик]

Хорошо, а проблема то в чем? "Есть поля с запятыми". Это как? И чем они мешают?

К тому же, как минимум, надо строковое значение заключать в кавычки:

Query.SQL.Add('select * from goods where cate_name ='+ QuotedStr(tree.Selected.text));

---
Обрабатывать отображение в гриде надо по событию OnChange в TreeView. Потому как OnClick реагирует только на клик мыши и данные в гриде не будут меняться при движениях по дереву через клавиатуру.

[yaskin]

Спасибо. Ошибка исчезла.
Может наглею, но подскажите еще такой вопрос.
Есть процедура заполнения TreeView. нашел в интернете

procedure FillTree(Tree: TTreeView; Query: TDataSet; idNode, idParent,
  cNodeName: string);
var
  i: integer;
begin
  // Корневой узел, должен быть первым в выборке Query
  Query.First;
  Tree.Items.Clear;
  Tree.Items.AddObject(nil, Query.FieldByName(cNodeName).AsString,
    Pointer(Query.FieldByName(idNode).asInteger));
  Query.Next;
  while not Query.Eof do
  begin
    i := 0;
    while i < Tree.Items.Count do
      if Tree.Items.Item[i].Data = Pointer(Query.FieldByName(idParent).asInteger)
        then
      begin
        Tree.Items.AddChildObject(Tree.Items.Item[i],
          Query.FieldByName(cNodeName).AsString,
          Pointer(Query.FieldByName(idNode).asInteger));
        break;
      end
      else
        Inc(i);
    Query.Next;
  end;
end;

Вот я заполняю treeview

procedure TForm1.Button4Click(Sender: TObject);
begin
Query.Active:= True;
  FillTree(Tree, Query, 'cate_id', 'parent_id', 'cate_name');
end;

залились в TreeView категории cate_name, а как получить cate_id оттуда. подозреваю что можно как-то через параметры, но не знаю как. не подскажете.
заранее спасибо

[=master=]

Что значит как поучить? куда получить?

[yaskin]

в treeview название категории можно получить из tree.Selected.text, а как получить cate_id оттуда

[=master=]

Вы его куда сохраняете? Оттуда и взять надо.

[yaskin]

Сообщение от =master=

Вы его куда сохраняете? Оттуда и взять надо.

очень умно. понятно что оттуда. вопрос как?

[Stilet]

вот так:

...:=Integer(TreeView1.Selected.Data);

Учитывая что речь идет о выбранной ветке.

[yaskin]

Сообщение от Stilet

вот так:

...:=Integer(TreeView1.Selected.Data);

Учитывая что речь идет о выбранной ветке.

Сделал так

  Query.SQL.Add('select * from goods where cate_id = '+InttoStr(Integer(Tree.Selected.Data)));

заработало.
Спасибо