TTreeNodesDelete (C++)

From RAD Studio Code Examples
Jump to: navigation, search

Description

The following example deletes an item in the tree view when you click it, and if the check box is checked. This example requires a populated TreeView.

Code

void __fastcall TForm1::TVMouseDown(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)
{
  THitTests HT;
  if (CheckBox1->Checked && Sender->ClassNameIs("TTreeView"))
  {
    TTreeView *pTV = dynamic_cast<TTreeView *>(Sender);
    HT = pTV->GetHitTestInfoAt(X,Y);
    if (HT.Contains(htOnItem))
      pTV->Items->Delete(pTV->GetNodeAt(X,Y));
  }
}

Uses