haitao:
我对treeview、checklistbox的改进就是这样做的,不知道算不算一种“注入”
[阅读: 554] 2009-06-10 09:13:58
为它们的每一个,都增加一个右键菜单的功能:
AddMi('+++全部展开');
AddMi('---全部收缩');
AddMi('++展开当前节点及其子节点');
AddMi('--收缩当前节点及其子节点');
AddMi('+展开当前节点');
AddMi('-收缩当前节点');
AddMi('');
AddMi('复制树');
AddMi('按指定层数展开(层数在剪贴板)');
if TreeviewHasCheckBox(tv) then
Begin
AddMi('');
AddMi('开始连续选取');
AddMi('连续选中');
AddMi('连续反选');
AddMi('');
AddMi('统计所选情况');
AddMi('到下一个选中的节点');
AddMi('');
AddMi('选中全部树节点');
AddMi('反选全部树节点');
AddMi('');
AddMi('复制树节点的选择情况');
AddMi('粘贴树节点的选择情况(保留当前所选)');
End;
AddMi('提示当前的选择情况');
AddMi('跳到下一个选中的项');
AddMi('');
AddMi('全部选中');
AddMi('全部反选');
AddMi('');
AddMi('复制当前的选择项到剪贴板');
AddMi('粘贴选择项','在当前的选择基础上只增不减');
AddMi('');
AddMi('开始连续选取');
AddMi('连续选中');
AddMi('连续反选');
AddMi('');
AddMi('增加1列');
AddMi('减少1列');