ICONS vor Eintrag in TTreeView

[Sko]

wenn du eine Imagelist hast die mit dem Treeview verknüpft ist kannst du für den entsprechenden Eintrag einfach den ImageIndex setzen:

Delphi-Quellcode:

var n      : TTreeNode;
begin
.
.
.
n:=b.Items.AddChildObject(nil, t1.FieldByName('Feld1').AsString, Pointer(t1.FieldByName('Pk').AsInteger)); 
n.ImageIndex := <index von dem Bild in der Imagelist>;
.
.
.
end;