Treeview Finde en Parent i et treeview

Din parent er nem nok :

if TreeView1.Selected <> NIL then
begin
  ShowMessage(TreeView1.Selected.Parent.Text);
end;

Det med index nr. er jeg ikke sikker på du kan få, men du kan jo selv finde det, ved at søge på din parent's child's

/Martin

Indexnr:

procedure TForm1.TreeView1Click(Sender: TObject);
var
SelNode: TTreeNode;
i : integer;
begin
SelNode := TreeView1.Selected;
i := selnode.AbsoluteIndex;
showmessage('Nr: ' + inttostr(i));
end;

Stoney

Det er bare ikke AbsoluteIndex man skal bruge men Index

procedure TForm1.TreeView1Click(Sender: TObject);
begin
  ShowMessage('Nr: ' + IntToStr(TreeView1.Selected.Index));
end;

martin>>

Du er rigtig på mærkerne i dag *G*

Hvis du vil bruge Index skal du lægge 1 til for at få i et "menneskeligt" format

Stoney

Hej Stoney & Martin

Jeg synes at i kæmpet barvt om at give det beste svar så ved at tage lidt fra begge køre det nu som jeg vil have det.

foresten hvis man vil have parents Index nr så Index := Treview1.Seleced.Parent.index er det hvis det  man bruger Mange tak skal ihave 30P til jer begge

MZG