delphi - 在 Delphi 中编译/链接未使用的函数/过程

Question

我想在我的应用程序中“提供”几个函数/过程，甚至是变量，而不是在我自己的代码中使用它们。编译器会自动忽略未使用的变量和函数还是链接器？我该如何改变它？我已经尝试取消选中 CodeGeneration ---> Optimization 但没有成功。

Answer 1

如果您程序中的某些内容引用了该对象，则链接器无法删除它。所以你可以像这样利用它:

procedure StopLinkerRemoval(P: Pointer);
begin
end;

然后在你的初始化部分你可以这样写:

StopLinkerRemoval(@MyVar);
StopLinkerRemoval(@MyFunction);

您需要做的就是引用对象。您不需要调用函数，也不需要读/写变量，只需获取它的地址。