Pointer of Record --> Record konvertieren

[Daniel G]

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...