用delphi编写的程序,运行越来越慢,怎么知道内存占用为什么越来越多

原因是动态分配了内存而没有释放。可在你的程序中动态查询内存使用情况，如下面的函数：// 用GlobalMemoryStatus函数获取内存使用信息 
　　MemStatus: TMEMORYSTATUS; //定义内存结构变量 
　　Lbl_Memory:Tlabel; 
　　MemStatus.dwLength := size of(TMEMORYSTATUS); 
　　GlobalMemoryStatus(MemStatus); //返回内存使用信息 可用 Timer 控件，也单独开一个线程进行内存的查看。除此以外，Delphi 本身的调试器就可以查看程序内存情况
当然也可以用查看内存的工具，如：http://www.google.com/search?q=%B2%E9%BF%B4%C4%DA%B4%E6+%B9%A4%BE%DF&btnG=Google%CB%D1%CB%F7&hl=zh-CN