定期删除程序运行日志文件

程序下生成的日志文件,随着程序的使用慢慢的变多,出于对软件的维护,我们要定期删除过早的日志文件。 索性就整个代码吧。  function DelAppLog():boolean;//是否删除程序运行日志文件 var     t:tdatetime;//用来临时存放日志文件的创建时间   begin     try       if fileexists(logfile) then