Imports Infragistics.Win.UltraWinTree Private Sub ultraTree1_BeforeDelete(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinTree.BeforeNodesDeletedEventArgs) Handles ultraTree1.BeforeDelete Dim sb As New System.Text.StringBuilder() sb.Append("The following nodes are about to be deleted: ") Dim node As UltraTreeNode ' 削除しようとしているノードをループします ' 注: イベント引数によって公開される Nodes コレクション ' は読み取り専用です For Each node In e.Nodes sb.Append(node.Key) sb.Append(", ") Next sb.Append(" Press ''OK'' or ''Cancel''.") Dim dr As DialogResult dr = MessageBox.Show(Me, _ sb.ToString(), _ "Deleting Nodes", _ MessageBoxButtons.OKCancel) If dr = DialogResult.Cancel Then e.Cancel = True ' デフォルトのメッセージ ボックスを表示しない ' ように DisplayPromptMsg フラグを False に設定します e.DisplayPromptMsg = False End Sub
using System.Diagnostics; using Infragistics.Win.UltraWinTree; private void ultraTree1_BeforeDelete(object sender, Infragistics.Win.UltraWinTree.BeforeNodesDeletedEventArgs e) { System.Text.StringBuilder sb = new System.Text.StringBuilder(); sb.Append("The following nodes are about to be deleted: "); // 削除しようとしているノードをループします // 注: イベント引数によって公開される Nodes コレクション // は読み取り専用です foreach ( UltraTreeNode node in e.Nodes ) { sb.Append( node.Key ); sb.Append( ", " ); } sb.Append(" Press ''OK'' or ''Cancel''."); DialogResult dr = MessageBox.Show( this, sb.ToString(), "Deleting Nodes", MessageBoxButtons.OKCancel ); if ( dr == DialogResult.Cancel ) e.Cancel = true; // デフォルトのメッセージ ボックスを表示しない // ように DisplayPromptMsg フラグを False に設定します e.DisplayPromptMsg = false; }