TTreeView, OnDblClick i zwijanie

0

Witam!

Mam taki problem. Korzystam z komponentu TTreeView, w którym wyświetlam pewne drzewko. Obsługuję zdarzenie onDblClick. Chodzi o to, że jak ktoś dwukrotnie kliknie w element to wyświetlam pewne informacje. Chcę jednak by drzewko cały czas było rozwinięte. Gdy jednak kliknę na gałęzi dwa razy myszką, to mi się ona zwija.

I pytanie. Czy istnieje możliwość zablokowania TTreeView tak, by dwuklik nie zwijał gałęzi?

0

Np:

procedure TForm1.TreeView1DblClick(Sender: TObject);
begin
  TreeView1.Items.Item[TreeView1.Selected.AbsoluteIndex].Expanded:=
    not TreeView1.Items.Item[TreeView1.Selected.AbsoluteIndex].Expanded;
end;

1 użytkowników online, w tym zalogowanych: 0, gości: 1