delphi 新建unit之后，自动添加unit注解

我想每次在new 一个unit或者form时，在.pas档中 unit上面，自动添加下面的注解
delphi中能设置么???
//*****************************************************
//*Unit Name    :XXX
//*Description  :XXX
//*Author       :XX
//*Created      :XXX
//*Company      :XXX
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
beginend;end.