new 和 free--内存分配问题

Question

procedure TPaperView.BtnAddClick(Sender: TObject);
var
  aItem:PQItem;
begin
    new(aItem);
    .
    .
    .
    TQItem(aItem).free;--->出错
end;
其中,PQItem=^TQItem;
请问怎么样才能释放我用new分配的这个内存?

Answer 1

new过程对应的是dispose过程procedure TPaperView.BtnAddClick(Sender: TObject);
var
  aItem:PQItem;
begin
    new(aItem);
    .
    .
    .
    dispose(aItem);
end;

Answer 2

dispose(aItem);free用来释放对象占用的内存,不适合New

Answer 3

new和.Create；有什么不一样么？