MemoryLeak bei VirtualStringtree

[youuu]

Hi, EurekaLog zeigt mir beim schließen immer ein MemoryLeak an von den Daten des Vst.

Die Daten des Vst werden so freigegeben.

Delphi-Quellcode:

procedure Tfrm_start.VstFreeNode(Sender: TBaseVirtualTree;
  Node: PVirtualNode);
Var
  Liste: Tliste;
begin
  Liste := Tliste(Vst.GetNodeData(node)^);
  Liste.Free;
end;

Muss das irgendwie noch speziell aufgerufen werden?