TListView и TTreeView - виндовс испортил [D6, WinXP]
sdw_syscoder © (2004-10-03 15:23:00)
У меня есть TTreeView и TListView, размещенные точно так же,
как это сделано в Windows Explorer (фактически я хочу им придать и
то же функциональное назначение). Как мне сделать следующее:
При двойном щелчке на элементе ListView узнать его индекс?
Затем, как мне 'открыть' ветку и папку в компоненте TreeView,
являющегося 'родителем' данного элемента? (В точном соответствии с
функциональностью Проводника, к этому моменту родительский узел
TreeView должен уже быть выбран - поэтому, я понимаю, необходимо
правильно определить дочерний узел - но я чего-то запутался в
синтаксисе).
jack128 (2004-10-03 16:00:00) [1]
sdw_syscoder (03.10.04 15:23)
> При двойном щелчке на элементе ListView узнать его
> индекс?
ListView1.Selected.Index
> Затем, как мне 'открыть' ветку и папку в компоненте
> TreeView, являющегося 'родителем' данного элемента? (В
> точном соответствии с функциональностью Проводника, к
> этому моменту родительский узел TreeView должен уже
> быть выбран - поэтому, я понимаю, необходимо правильно
> определить дочерний узел - но я чего-то запутался в
> синтаксисе).
при чем тут синтаксис? Нужно из всех детей веделенного
Node'а TreeView выбрать, тот который соответствует выделеному итему
ListView. Если это соответствие задается например именем, то
получиться что нить типа этого
for i := 0 to TreeView1.Selected.Count - 1 do
if TreeView1.Selected.Item[i].Text = ListView1.Selected
then
begin
TreeView1.Selected.Expand(False);
TreeView1.Selected.Item[i].Selected := True;
end;
ps за работостособность кода не ручаюсь ;-)
Наверх 
ЧАТ |
Орешник |
|
