程序重启里发生 appcrash 错误，怎么处理啊

我有个程序，设定为每小时自动重启一下，我用的重启代码是：
Delphi(Pascal) code

   application.Terminate;//直接关，或者用close;看情况用
   ShellExecute(Handle,'open',PChar(Application.ExeName),nil,nil,0);

但是程序运行，前几次重启是没有问题，在经历4，5次之后就会报错，提示： 问题事件名称: APPCRASH
服务器系统是windows server 2008

请高手指点一下，谢谢！

应该是资源占用引起的，建议使用计划任务之类的定时运行某些内容，或者使用其他定时运行，自己编写的也可以，这样可以避免不必要的麻烦。