本文整理自网络，侵删。
今天调试一个开源的例子程序，无意中发现一个IDE用来测试内存泄漏的语句。
不过应该是Delphi2006以后的版本才能使用。
实施方法方法非常简单，在Project source中加入如下第一条语句。
ReportMemoryLeaksOnShutdown := DebugHook <> 0;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
为了测试效果，在你的主窗体onCreate事件中写一个引起泄漏的Test Case。
var
sl : TStringList;
begin
sl := TStringList.Create;
sl.Add('Memory leak!') ;
end;
在DEBUG状态下启动程序，然后退出程序你应该能看到一个内存泄漏提示对话框。
相关阅读 >>
Delphi中的处理事件 application.processmessages
Delphi 中的哈希表: thashedstringlist
Delphi xe5 android 解决ide真机调试不起问题
Delphi controlcount和componentcount的区别
更多相关阅读请进入《Delphi》频道 >>
