可能重复:
How can I identify and get rid of unused units in the “uses clause” in Delphi 7?
是否也可以检查不需要的使用单位,从而扩展项目超出其需求?
我们有
的例子unit a;
uses b,c;
procedure aP;
var bI:Tb;
begin
bI := Tb.create;
bI.free;
end;
end.
没有使用c。 c被引入该项目,从未在项目中使用过。
答案 0 :(得分:8)
是的,您可以使用CnPack中的工具或Peganza中的工具。
请注意,即使您没有引用单位中定义的符号,包含该单位也会对您的项目产生影响。包含一个单元意味着任何initialization
或finalization
部分中的代码都会运行,这当然可以改变程序的含义。这个典型的例子是替换内存管理器。
FAQ for GExperts讨论了这个问题,并解释了为什么他们不提供这样的便利。