关于资源保护与内存释放

1.Tstrings 必须手工释放 Free (TstringList 在堆里分配内存，没有拥有者，所以没有帮她释放的类)

2.关于form释放问题

要彻底释放窗体，光close是不够的。 一般需在onclose事件中写Action:=cafree 并在

FormDestroy事件中写from:=nil;

方法1：

try

if not Assigned(Form2) then

Form2 := TForm2.Create(Application);

Form2.ShowModal;

finally

Form2.Free;

Form2:= nil;

end;

方法二

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);

begin

action := cafree;

end;

procedure TForm2.FormDestroy(Sender: TObject);

begin

form2:=nil;

end;

3.有创建就要有释放

打开一个 创建一个 关闭一个 释放一个

4.看了一天的贴子，有些感触：谁创建谁负责释放。

静态变量系统负责

动态变量自己负责

无论如何要保证内存不会泄漏，下面为摘抄文字：

1在静态区：这种变量在编译的时候就分配空间，生命周期可以认为和你的进程一样长。

不用手动分配和释放。比如：全局变量。

2在栈上：由系统自动分配，自动释放。生命周期局限与作用域（一个函数和过程）。

比如：所有的局部变量和函数过程的参数。

3在堆上:用之前由你向系统申请空间，用过后必须手动释放，否则内存泄露。

比如：Delphi中所有类的实例.