复制组件可以制作高级选择夹

组件标记 ＝ 到整数 (关闭按钮.标记) － 2000
队列.取队列首节点 (节点)
节点.取数值 (“当前选单”, 当前键值)
.如果真 (组件标记 ＝ 当前键值)
链表.搜索节点 (当前键值)
链表.向上移动 ()
链表.取当前节点键值 (S)
调整显示 (S)
.如果真结束
链表.搜索节点 (组件标记)
链表.删除当前节点 ()
.判断循环首 (链表.向下移动 ())
链表.取当前节点键值 (b)
事件按钮 ＝ 取标记组件 (b)
事件按钮.移动 (事件按钮.左边 － 事件按钮.宽度 － 1, , , )
关闭按钮 ＝ 取标记组件 (b ＋ 2000)
关闭按钮.移动 (关闭按钮.左边 － 事件按钮.宽度 － 1, , , )
.判断循环尾 ()