当前位置:首页 > 个人杂谈 > 正文内容

Delphi MessageBox默认按钮问题

作者: 葛一速 | 日期: 2021-12-31 | 分类: 个人杂谈

最近客户提出一个比较奇怪的要求,弹窗提示时,默认按钮为【否】,通常情况下,弹窗的咨询窗口,通常按钮有2个,是与否,按习惯先左后右,默认按钮是【是】。
Delphi MessageBox默认按钮问题

以往也没有遇到这种做法,不过,DELPHI有帮助文件,按F1看了下帮助文件(如上图例子),结果还是跟平常使用的一样,并没有得到有用的信息。

还是要靠搜索啊,资料很少,在不断收缩搜索范围后,总算找到一段有用的代码,直接测试了下,发现是正解。

完整代码如下:

if Application.MessageBox(PChar(‘检测到已超出保质期,是否继续操作?’),
‘请问’,MB_ICONQUESTION + MB_YesNo or MB_DEFBUTTON2)=IDNO then
begin
Exit;
end;

查了MB_DEFBUTTON的资料,解释如下:

可指定预设Focus在哪一个按钮

MB_DEFBUTTON1:指定focus在左边第一个按钮,这是默认值。

MB_DEFBUTTON2、MB_DEFBUTTON3、MB_DEFBUTTON4,以此类推,指定focus在左边第二、三、四个按钮。

果然还是搜索万能的,有问题就百度一下吧。

版权声明:本文由〖葛一速博客〗发布,转载请注明出处!
文章链接:http://www.geyisu.com/2338.html

  • 评论:(0)

已有 0 位网友发表了一针见血的评论,你还等什么?

◎欢迎大家参与讨论

站内搜索