Vier VirtualStringTree auf einem Formular - ist das zuviel

[Albi]

Hallo,

schon dass das der Fehler war aber hast Du da keine AV bekommen, beim beenden des Programmes? Wenn ich das mache, dann bekomme ich eine.

Noch was

Zitat:

Code:

procedure TKalk.vststundenFreeNode(Sender: TBaseVirtualTree; 
  Node: PVirtualNode); 
var 
   Data: PStundenData; 
begin 
   Data := vst.GetNodeData(Node); //hier müste doch VSTStunden stehen oder? 
   if not Assigned(Data) then 
      exit; 
   Data.FStunde.Free; 
end;

Kann mich aber auch ihren aber ich denke das jedes VST seine eigene FreeNode braucht.