begin
if Application.MessageBox('确实要退出吗?','提示',mb_yesno)=id_yes then
close;
end;
MB_AbortRetryIgnore
The message box contains three push buttons: Abort, Retry, And Ignore.
MB_OK
The message box contains one push button: OK. This is the default.
MB_OkCancel
The message box contains two push buttons: OK And Cancel.
MB_RetryCancel
The message box contains two push buttons: Retry And Cancel.
MB_YESNO
The message box contains two push buttons: Yes And No.
MB_YesNoCancel
The message box contains three push buttons: Yes, No, And Cancel.]
-----------------------------------------
IDOK 1 The user chose the OK button.
IDCANCEL2 The user chose the Cancel button.
IDABORT 3 The user chose the Abort button.
IDRETRY 4 The user chose the Retry button.
IDIGNORE 5 The user chose the Ignore button.
IDYES 6 The user chose the Yes button.
IDNO 7 The user chose the No button.
if (MessageBox(strTemp.c_str(),"提示",MB_ICONINFORMATION|MB_YESNO) ==7)
return;
阅读(1251) | 评论(0) | 转发(0) |