说 说说 Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-09 #1 各位高手你好！ 我请教一个问题，如何截取win98关闭的消息？！ 急！谢谢！
K Kang Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-09 #3 如果你想关闭你的程序后,才能关闭98,也可以处理主Form的OnCloseQuery事件 procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin if MessageDlg('Exit Program?',mtConfirmation,mbYesNoCancel,0)=mrYes then canclose:=true else canclose:=false; end;
如果你想关闭你的程序后,才能关闭98,也可以处理主Form的OnCloseQuery事件 procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin if MessageDlg('Exit Program?',mtConfirmation,mbYesNoCancel,0)=mrYes then canclose:=true else canclose:=false; end;
K Kang Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-09 #5 o*o是让你自己来处理WM_QUERYENDSESSION消息 WINDOWS推出时会向每个程序发送这个消息
