VirtualStringTree - Speicher freigeben

[Bjoerk]

Wie issn so?

Delphi-Quellcode:

procedure TForm1.VSTFreeNode(Sender: TBaseVirtualTree; Node: PVirtualNode);
var
  Data: PTreeData;
begin
  Data := Sender.GetNodeData(Node);
  Finalize(Data^);
end;