减少Delphi程序运行时所占内存
这段代码比较神奇，用一个Timer，隔一段时间执行一次，的确可以大大减少运行时占用的内存。我感觉就像是程序最小化是占用的内存。还不清楚是否影响反应和运行速度。
只对Win2000以后操作系统有效，不过这年头用XP的差不多有80％了吧！
if Win32Platform = VER_PLATFORM_WIN32_NT then
begin
SetProcessWorkingSetSize(GetCurrentProcess, ＄FFFFFFFF, ＄FFFFFFFF);
Application.ProcessMessages;
end;