in TTreeView einfügen mit ImageIndex

[freak1985]

hi,

also ich möchte auf einen ButtonClick, dass ein Item im Treeview hinzugefügt wird undzwar mit einem ImageIndex versehen.

hab das folgendermaßen probiert, aber funktioniert leider nicht so.

Delphi-Quellcode:

var
  tmp: TTreeNode;
  s: STring;
begin
  s := 'sdfsdfsdF';
  tmp := TTreeNode.Create(nil);
  tmp.ImageIndex := 0;
  tmp.Text := s;
  TreeView1.Items.Add(tmp, s);

kann mir jemand sagen, was ich falsch mache?

[marabu]

Hallo,

Zitat von freak1985:

kann mir jemand sagen, was ich falsch mache?

du verwendest die Methode TTreeNodes.Add() nicht bestimmungsgemäß. Nicht du, sonder diese Methode erzeugt den neuen Knoten. Der erste Parameter ist der Referenzknoten (sibling) im Baum und der Rückgabewert ist dein neuer Knoten:

TreeView.Items.Add(nSibling, 'sdfsdfsdF').ImageIndex := 0; Grüße vom marabu