提供另一种解决思路。其实 scx文件也是一个DBF,用这个思路,可以直接USE SCX文件:
这里我们只提供思路,具体代码不难,就不提供了。
然后遍历DBF,查找 BaseClass = 'commandbutton'的记录,
找到后,打开他的Methods字段,里面就是你写的过程:
剩下的,就是文字处理了,利用你学到的文本函数(自己查吧,我这里不写了)
找这一段文字里有“PROCEDURE RightClick” 的,如未找到,说明这个按钮没有 RightClick过程,跳过。
如果找到,继续找 PROCEDURE RightClick 下面的第一个 “ENDPROC”,
然后把 “PROCEDURE RightClick” 到 ENDPROC 之间 的代码 删除。
继续下一记录……
代码就不写了,你自己摸索一下,应该不难。