TreeView

← →
xman © (2004-08-11 20:01) [0]

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

← →
афвуд (2004-08-11 20:58) [1]

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 по пути //куда-нибудь. ПИсать это влом чесно говоря.

← →
jack128 © (2004-08-11 21: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;

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

TreeView Найти похожие ветки