超级文件粉碎机例子，可以解锁文件

.如果真 (判断全部选择 ())
返回 ()
.如果真结束
.如果真 (信息框 (“解锁选中的全部文件可能速度非常慢，您确实要解锁全部文件吗？”, #询问图标 ＋ #确认取消钮, “信息：”) ＝ #确认钮)
LoadingImage.可视 ＝ 真
处理事件 ()
.计次循环首 (拖放超级列表框.取表项数 (), x)
EnumLockFile (拖放超级列表框.取标题 (x － 1, 0))
处理事件 ()
.计次循环尾 ()
LoadingImage.可视 ＝ 假
信息框 (“已经完成全部解锁任务！”, #信息图标, “信息：”)