TreeView pridani aktivniho uzlu. – Delphi – Fórum – Programujte.com

zdravim,

prosim o radu,

mam funkci, ktera mi z TreeView vypise cestu k aktivnimu adresari:

function VratCestu(tn: TTreeNode): string;
begin
  Result := '';  
  while tn <> nil do
  begin
    if Result <> '' then
      Result := PathDelim + Result;
    Result := tn.Caption + Result;
    tn := tn.Parent;
  end;
end;

a ted bych potreboval do udalosti OnClick TreeView1  pridat aktivni uzel a osetrit, jestli nejaky je ,ale nemam s tim zkusenosti a nevim jak na to .. 

#2 Sniper

diky, pomohlo