| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

TreeView [D3, Win95/98]

xman ©   (2004-08-11 20:01:00) 

Ув. мастера, как узнать в какую ветвь вложен объект?
Например:
такое дерево
new
 1
   a
   sdf
 2
   b
      asdfg
   vb
 3
Мне надо получить при выборе 'asdfg' такой результат
new\2\b\asdfg

---

jack128   (2004-08-11 21:02:00) [1]

> Result := Result + Node.Text + '\';
наоборот, конечно.
Result := Node.Text + '\' + Result;

---

jack128   (2004-08-11 21:00:00) [2]

function Path(Node: TTreeNode): string;
begin
Result := '';
while Assigned(Node) do
begin  
  Result := Result + Node.Text + '\';
  Node := Node.Parent;
end;
SetLength(Result, Length(Result) - 1);
end;

---

афвуд   (2004-08-11 20:58:00) [3]

var
cur:TTreeNode;
....

cur:=TreeView1.GetFirstNode;
while(cur<>nil)
 begin
 if(cur->Text'asdfg') then break;
 cur:=cur.GetNext;
 end;

if(cur=nil) then begin ShowMessage('Нет такого'); exit; end;

//Ну теперь всё. В cur нужный элемент. Теперь можно по
//Parent'ам добраться до корня забрасывая все Text по пути
//куда-нибудь. ПИсать это влом чесно говоря.

---

Наверх