Question

怎么样在窗口关闭时拦截窗口的WM_DESTROY事件。（delphi)

Answer 1

上面有点不当之初unit Unit1;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TFMTest = class(TForm) BNClose: TButton; procedure BNCloseClick(Sender: TObject); private procedure WMDestroy(var msg: TMsg); message WM_DESTROY; public { Public declarations } end;var FMTest: TFMTest;implementation{$R *.DFM}{ TBNClose }procedure TFMTest.WMDestroy(var msg: TMsg);begin {此处加入想要执行的过程} inherited;end;procedure TFMTest.BNCloseClick(Sender: TObject);begin Close;end;end.

Answer 2

我说的是拦截本程序的主窗口关闭的消息。也就是想在应用程序关闭后使其再另外执行一段程序

Answer 3

拦截本程序还是其他程序？