Question

易语言的树形框，书籍，卷，章节，有三级项目，如何禁止右键菜单添加子项目给章节添加子项目啊？

Answer 1

.版本 2
.支持库 iext
.子程序 _新建作品_被选择
.局部变量 作品名, 文本型
输入框 (“输入作品名”, “新建作品”, , 作品名, , _启动窗口)
.如果真 (作品名 ≠ “”)
树型框1.加入项目 (, 作品名, , , , , )
保存 (取运行目录 () ＋ “\config.ini”, 树型框1)
.如果真结束
' 树型框1.清空 ()
' 读取 (取运行目录 () ＋ “\config.ini”, 树型框1)
.子程序 _新建卷_被选择
.局部变量 卷名, 文本型
.如果真 (树型框1.现行选中项 ≠ -1)
输入框 (“输入章节名”, “新建卷”, , 卷名, , _启动窗口)
.如果真 (卷名 ≠ “”)
.如果真 (树型框1.取缩进层次 (树型框1.现行选中项) ＝ 2)
树型框1.加入项目 (树型框1.取父项目 (树型框1.现行选中项), 卷名, , , , , )
.如果真结束
.如果真 (树型框1.取缩进层次 (树型框1.现行选中项) ＝ 3)
树型框1.加入项目 (树型框1.取父项目 (树型框1.取父项目 (树型框1.现行选中项)), 卷名, , , , , )
.如果真结束
.如果真 (树型框1.取缩进层次 (树型框1.现行选中项) ＝ 1)
树型框1.加入项目 (树型框1.现行选中项, 卷名, , , , , )
.如果真结束
保存 (取运行目录 () ＋ “\config.ini”, 树型框1)
.如果真结束
.如果真结束
' 树型框1.清空 ()
' 读取 (取运行目录 () ＋ “\config.ini”, 树型框1)
.子程序 _新建章节_被选择
.局部变量 章节名, 文本型
.如果真 (树型框1.现行选中项 ≠ -1)
输入框 (“输入章节名”, “新建章节”, , 章节名, , _启动窗口)
.如果真 (章节名 ≠ “”)
.如果真 (树型框1.取缩进层次 (树型框1.现行选中项) ＝ 3)
树型框1.加入项目 (树型框1.取父项目 (树型框1.现行选中项), 章节名, , , , , )
.如果真结束
.如果真 (树型框1.取缩进层次 (树型框1.现行选中项) ＝ 2)
树型框1.加入项目 (树型框1.现行选中项, 章节名, , , , , )
.如果真结束
.如果真 (树型框1.取缩进层次 (树型框1.现行选中项) ＝ 1)
树型框1.加入项目 (树型框1.现行选中项 ＋ 1, 章节名, , , , , )
.如果真结束
保存 (取运行目录 () ＋ “\config.ini”, 树型框1)
.如果真结束
.如果真结束
' 保存 (取运行目录 () ＋ “\config.ini”, 树型框1)
' 树型框1.清空 ()
' 读取 (取运行目录 () ＋ “\config.ini”, 树型框1)

Answer 2

树形框有个取级别命令 取缩进层次()