有没有一款重构工具可以删除“with”块?例如,将以下代码转换为:
with Form1 do
begin
Height := Blah;
Blubb := Name;
end;
为了
Form1.Height := Blah;
Blubb := Form1.Name;
其中Form1是VCL TForm。最好能与Delphi 2007兼容。