使用MESSAGEBOX出现的提示窗口（有YES、NO两个按钮），如何让按ESC等于NO按钮。(50分)

dana · 2002-03-02

比如
if MESSAGEBOX(HANDLE,' 关闭? ','警告',mb_iconwarning+mb_yesno)=mrNO then ABORT;
如何让按ESC时，相当于单击了NO？

zhihuali · 2002-03-02

自己写一个窗体来代替 MESSAGEBOX 函数。

dana · 2002-03-02

那太麻烦了。

shangshang · 2002-03-02

改为：

if MESSAGEBOX(HANDLE,' 关闭? ','警告',mb_iconwarning+mb_okCancel)=mrok then ABORT;
就可以了。
如果非要按钮上显示'是‘，’否‘的话。
用messagedlg吧，但是一定要先修改vcl常量单元文件的常量。

dana · 2002-03-02

不是，因为没有鼠标，所以无法按NO的按钮，如何用键盘按ESC代替按了NO的按钮.

shangshang · 2002-03-02

if MESSAGEBOX(HANDLE,' 关闭? ','警告',mb_iconwarning+mb_okCancel)=mrok then ABORT;
这句就可以啊，你试试啊！

dana · 2002-03-02

是啊，这句没错啊，但我要实现的是用键盘的ESC去按NO的按钮，如何按？

dana · 2002-03-04

有人知道吗？

lang_kkl · 2002-03-04

获得MessageBox的窗口句柄，扑获键盘按下的事件，
向窗口发消息。

dana · 2002-04-21

多人接受答案了。