form的资源释放

资源没有释放，很多情况是因为窗口在关闭（Form1.Close;）的时候没有释放（Form1.Free）。一般情况要这样：
Form1:=TForm1.Create(Self);
Form1.ShowModal;
Form1.Free;
或者在窗口的OnClose事件写上：Action:=Cafree;在窗口的OnDestroy事件写上：Form1:=Nil;