DELPHI窗口关闭
请问一下能不能在点击Form的关闭按钮（默认的那个）时执行一段其他代码，这段代码该添加在什么地方。

[解决办法]
form.onclose() 事件
[解决办法]
onClose
[解决办法]
点击窗体的关闭按钮后，会产生OnClose事件

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

其中参数Action还可以控制窗口的关闭
如
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action:=caNone;
end;
这样，当点击关闭按钮时，窗口不会关闭
当Action:=caFree时，窗口才会正常关闭，系统默认“Action:=CaFree”
[解决办法]
OnCloseQuery也可以的
[解决办法]
Event中的onclose