实例13 new与dispose

New也是用于分配内存空间,与C语言中的New相似,但没有C语言中的Newname灵活。在Pascal语言中,New主要用于分配固定长度的空间,对于记录内存空间分配运用较多,比如:

type

  PMList=^TMyList;

  TMyList=record

    Next:PMyList;

    Text:string;

    Count:Integer;

  end;

var

  List,P:PMyList;

begin

  ...

  New(P);

  P^.Next:=List;

  P^.Text:='Hello welcome';

  P^.Count:=1;

  List:=P;

  DisPose(P);

  ...

end;

用New分配的内存,要用Dispose来释放,这一点与C语言不同,C语言是用Delete来释放New分配的空间。

posted on 2022-03-02 23:46  Delphi搬运工  阅读(91)  评论(0)    收藏  举报