5,901
社区成员




windows server2016上delphi开发应用程序占用内存有时2~3秒内会涨1G左右,有时又正常,凌晨啥事都没干也会突然涨上去;
win10和win2012的系统上运行,没见这个问题。
求助,困扰了大半年了
这样降低内存,不好吧,现在服务器内存都大得很,何必要手工降低呢!
冲冲冲
主页面放一个Timer1Timer
然后定时执行
procedure TFMain.Timer1Timer(Sender: TObject);
begin
SetProcessWorkingSetSize(GetCurrentProcess, $FFFFFFFF, $FFFFFFFF);
Application.ProcessMessages;
end;
SetProcessWorkingSetSize