Question

Delphi动态数组好象没有彻底释放？怎么彻底释放掉内存啊？

在点击按钮时创建数组，接着释放，点击多次后，内存占用逐渐增加，从最初的1M多到30M多，并且还持续增加。代码如下：
procedure TForm1.Button4Click(Sender: TObject);
var
aryTest:array of widestring;
i,j:Integer;
begin
SetLength(aryTest,1000000);
for i:=0 to Length(aryTest)-1 do
begin
aryTest[i]:=IntToStr(i);
end;
Finalize(aryTest);
end;

Answer 1

还没执行到Finalize(aryTest)或者Finalize(aryTest)还没执行完，你就又按按钮了吧。
这要是降不下来，delphi就没法用了。

追问

我一直点的比较慢。现在我在Finalize(aryTest)后面又加了一句showmessage('运行结束')，等到弹出消息提示时我再运行，可是结果还是一样，内存占用还是不断地增加。点9次后内存就占了19M多了。
另外，如果是string类型的数组，就不存在这样问题。

追答

这应该不是这段代码所导致的问题。
你是否设置了linker什么的。
Delphi中的基础类型,widestring,pchar,string,integer,集合,数组等都是生成期自管理的，由编译器负责内存管理的。你不释放，在你这个事件执行完毕后，编辑器也会自动释放。
GetMem,New的才需要手动释放。

Answer 2

试试
SetLength(aryTest, 0);
aryTest := nil;