MessageDlg Delphi的IF语句

Question

如何使用if语句获取在“MessageDlg”中单击的按钮的状态？

继承我的代码：

if MessageDlg('Message',mtError,[mbYesNoCancel],0) = No
    then ShowMessage('Message2');

我看到我的IT老师不久前写了这样的东西，但我不记得语法。

Answer 1

documentation说：

  

MessageDlg返回用户选择的按钮的值。该   下表列出了每种按钮的TMsgDlgBtn值   可以出现在消息框中，以及相应的值   如果用户选择该按钮，则返回：

TMsgDlgBtn Value    Corresponding return value
mbOK                mrOk
mbCancel            mrCancel
mbYes               mrYes
mbNo                mrNo
mbAbort             mrAbort
mbRetry             mrRetry
mbIgnore            mrIgnore
mbAll               mrAll
mbNoToAll           mrNoToAll
mbYesToAll          mrYesToAll
mbClose             mrClose

所以你需要测试mrNo。

我建议您学习where to find documentation以使您的生活更轻松。