Hi,
ich habe einen TVirtualStringTree und in einer ImageList 30 Icons. Komigerweise zeichnet er immer Icon 0 über das icon was ich ihm bei OnGetImageIndex angebe. Das ist aber nur bei den icons 4-16 der fall. Unter 4 und über 16 zeichnet er normal.
Woran liegt das?
Delphi-Quellcode:
procedure TForm1.GetTreeImage(Sender: TBaseVirtualTree; Node: PVirtualNode;
Kind: TVTImageKind; Column: TColumnIndex; var Ghosted: Boolean;
var ImageIndex: Integer);
var
Data :PTreeData;
begin
Data:=VTreeView.GetNodeData(Node);
ImageIndex:=Data^.IconNr;
end;
Danke im voraus