Código Delphi [-] procedure TForm1.TreeView1Deletion(Sender: TObject; Node: TTreeNode); begin TMiClase(Node.Data).Free; end;
procedure TForm1.TreeView1Deletion(Sender: TObject; Node: TTreeNode); begin TMiClase(Node.Data).Free; end;