求助:这样的指针需要释放吗?如果要的话,是怎么释放的?
请教:
procedure TForm1.Button5Click(Sender: TObject);
var
ss:string;
ss1:^string;
begin
new(ss1);
ss:= '1222 ';
ss1^:=ss;
end;
我这里 new 了 ss1
我需要释放吗?
怎么释放的?
谢谢!
[解决办法]
New <-----> Dispose
GetMem <----> FreeMem
简单类型的对象,不必Free。
[解决办法]
//相对规范的写法
procedure TForm1.Button5Click(Sender: TObject);
var
ss:string;
ss1:^string;
begin
ss:= '1222 ';
new(ss1);
try
ss1^:=ss;
//do other
finally
dispose(ss1);
end;
end;