如何快速删除自定义函数的说明部分和实体部分？

Question

delphi6.0中如何快速删除自定义函数的说明部分和实体部分，有没有什么快捷方式？要是一个一个找来删除太麻烦了。 谢谢各位了！   

Answer 1

添加倒是不难，不管你是先定义，还是先实现，按ctrl+shift+c
都会给你补全，至于删除的话，我想只能是你把光标放到定义的地方，
然后按ctrl+shift+下方向键，找到实现后一个一个删除。

Answer 2

谢谢楼上，不过CTRL+SHIFT+C 是针对类中的方法使用的，对于类以外的自定义函数，恐怕是没有用处了。