Einzelnen Beitrag anzeigen

Der schöne Günther

Registriert seit: 6. Mär 2013
6.110 Beiträge
 
Delphi 10 Seattle Enterprise
 
#2

AW: TreeView - ALLE selektierten Einträge löchen

  Alt 20. Feb 2014, 15:48
Hm, also bei mir tut es eigentlich folgendes:

Delphi-Quellcode:
implementation uses System.Generics.Collections;

{$R *.dfm}
procedure TForm20.Button1Click(Sender: TObject);
var
   treeNode: TTreeNode;
   selectedNodes: TObjectList<TTreeNode>;
begin

   selectedNodes := TObjectList<TTreeNode>.Create(False);
   try
      for treeNode in TreeView1.Items do
         if treeNode.Selected then
            selectedNodes.Add(treeNode);

      for treeNode in selectedNodes do
         TreeView1.Items.Delete(treeNode);
   finally
      selectedNodes.Free();
   end;

end;
Oder habe ich die Frage falsch verstanden?
  Mit Zitat antworten Zitat