关于'yes','no'对话框的2个问题

hudingchen 2006-01-14 11:33:45
问题1:
弹出对话框的代码:
if Application.MessageBox ('是否要修改数据?', '系统提示', Mb_IconQuestion+Mb_yesno)=ID_YES then
在这个对话框中,怎么让它的默认焦点为‘no’的按钮
问题2:
含有yes,no,cancer对话框代码:
i:=messagedlgpos( '是否继续执行?',mtConfirmation, mbYesNo, 0, 200, 200);
在这个对话框中,怎么让它的默认焦点为‘cancer’的按钮 ,并且更改对话框的名字,它默认为confirm
...全文
179 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
sdzeng 2006-01-14
  • 打赏
  • 举报
回复
Application.MessageBox('你好','测试对话框',MB_YESNO+MB_ICONINFORMATION+MB_DEFBUTTON2);
cuteant 2006-01-14
  • 打赏
  • 举报
回复
Application.MessageBox ('是否要修改数据?', '系统提示', Mb_IconQuestion+Mb_yesno+MB_DEFBUTTON2)

MB_DEFBUTTON1默认是 MB_DEFBUTTON2默认否
zhangl_cn 2006-01-14
  • 打赏
  • 举报
回复
问题1:
弹出对话框的代码:
if Application.MessageBox ('是否要修改数据?', '系统提示', Mb_IconQuestion+Mb_yesno)=ID_YES then
在这个对话框中,怎么让它的默认焦点为‘no’的按钮

/////////////////////////////////

Application.MessageBox ('是否要修改数据?', '系统提示', Mb_IconQuestion+Mb_yesno+MB_DEFBUTTON2)
XY.Chen 2006-01-14
  • 打赏
  • 举报
回复
Application.MessageBox ('是否要修改数据?', '系统提示', Mb_IconQuestion + MB_YESNO or MB_DEFBUTTON2);
dongliu 2006-01-14
  • 打赏
  • 举报
回复
messagedlgpos( '是否继续执行?',mtConfirmation, mbYesNo, 0, 200, 200);
倒数第三个参数,改成1,2,你试试看就知道了

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧