有没有办法在Delphi中找到未使用的事件处理程序？

在Delphi中查找死代码通常很简单:只需编译然后扫描缺少蓝点的例程.在大多数情况下,智能链接器非常适合跟踪它们.

问题是,这对事件处理程序不起作用,因为它们是已发布的方法,(理论上)可以通过RTTI以某种方式调用,即使这在实际操作中几乎不会发生.

我正在努力清理一个大型的VCL模板单元,它在整个历史中经过多次弯曲,折叠,旋转和切割.如果我有某种方法可以找到表单的DFM实际上没有引用的事件处理程序并删除它们,那肯定会很好.有没有简单的方法来做到这一点？例如,插件IDE专家？

这是一个有点难看(OK,这是很多丑陋的),但对于一个单元,是接近万无一失,并且不需要额外的工具:

确保将表单的当前版本签入源代码管理!

转到事件处理程序所在类的接口顶部.删除所有事件处理程序方法接口.

查看Code Explorer/Error Insight.将突出显示具有实现但没有接口的方法.删除实现.

现在保存单位.Delphi将一次一个地抱怨实际处理的每个事件都缺少事件处理程序.当错误出现时写下这些.

查看表单的原始版本,并删除列表中不存在的任何事件处理程序.

使用"重命名方法"重构来重命名每个事件处理程序.选中"重构前查看参考"复选框.

检查"重构"窗口.如果事件处理程序链接到控件,则会出现"VCL Designer更新"部分,显示哪些控件链接到该方法.

这还将显示该方法是从任何其他单元调用还是以编程方式分配.

注意:这适用于D2006,在以后的版本中可能略有不同.