Zitat von
Florian Bernd:
aber wenn, dann müsste es auch Data^ heißen, oder?
Ja, natürlich...
Dann hilft das sicher auch nicht, oder?
Delphi-Quellcode:
procedure AddNodes(Root: PVirtualNode; Data: PCatData);
var
i: integer;
NodeData: PNodeData;
NewNode: PVirtualNode;
begin
with frmInteractive do
begin
NewNode := CatList.AddChild(Root);
NodeData := CatList.GetNodeData(NewNode);
NodeData.Caption := Data^.Caption;
NodeData.ImageIndex := Data^.ImageIndex;
NodeData.Panel := nil; // hinterher ändern
for i := low(Data^.SubCats) to high(Data^.SubCats) do
begin
AddNodes(NewNode, Data^.SubCats[i]);
end;
end;
Zitat von
Florian Bernd:
Weil Data ist ja auch vom Typ PNodeData ..
Stümmt nicht.
//Edit: Der xZise war zu schnell...
Zitat:
[edit]OOPs... Pointeralarm ^^ Hatte glatt die SubCats übersehen xD[/edit]
Die Funktion erwartet aber einen Pointer...