DELPHI 创建自己的定时器 定时清理内存

   google代码搜索确实是个好地方，就跟CSDN一样，资料真不少。下面这个例子就是自定义时间清理内存空间。

unit TrimWorkingSet;

interface

implementation

uses
  SysUtils, Windows, ExtCtrls;

type
  TTrimmer = class(TTimer) //继承自TTimer定时器类
  public
    procedure TimerTick(Sender: TObject);
  end;

procedure TTrimm