跟进这个问题,我正在研究一个写得不是很好的大型 Delphi 7 代码库。
我正在看这样的代码,作为一个小例子:
if FMode=mdCredit then begin
Panel8.Caption:='Credit';
SpeedButton3.Enabled:=false;
SpeedButton4.Enabled:=false;
SpeedButton5.Enabled:=false;
SpeedButton5.Enabled:=false;
SpeedButton6.Visible:=False;
SpeedButton10.Visible:=False;
end;
其次是另外 6 个非常相似的块。整件事情都是这种风格。所以我认为如果控件命名合理,这将更容易阅读。
我可以只使用全局搜索和替换,但是当多个表单使用相同的名称时我会遇到问题,而且我必须小心在 SpeedButton1 之前更改(例如)SpeedButton10。
是否有一些插件能够为我执行“智能”重命名?
编辑:
抱歉,我之前应该提到过这一点:我尝试了 GExperts 和 Castalia 的“重命名组件”功能,但它们似乎都是在最初将组件添加到表单时使用的。
他们不会在代码中进行搜索+替换,也不会重命名现有事件 (SpeedButtonXClick() -> cmdCreditClick())。
我错过了什么吗?