实例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分配的空间。
浙公网安备 33010602011771号