在这个例子中
procedure foobar; var tab:array of integer; begin setlength(tab,10); end;
数组是否被破坏或内存泄漏？
解决方法
记忆被释放. (也就是没有内存泄漏！)
procedure foobar; var tab:array of integer; begin setlength(tab,10); end;
数组是否被破坏或内存泄漏？