delphi 提示框??高分相送(100分)

  • 主题发起人 主题发起人 傻子
  • 开始时间 开始时间

傻子

Unregistered / Unconfirmed
GUEST, unregistred user!
delphi 中以下代码:
messagedlg('你好,mtinformation,[mbyes,mbno],1)
出现这个提示框后,焦点是定在yes那个按键上,能否把焦点定在no那个按键上.全天在线!!
高分相送!!1
 
用messagebox()
具体用F1看帮助!!!
 
我也有此需要,关注。
 
可以的,帮助里有
 
如果你用的是CLX,那么MessageDlg本身就有个DefaultButton参数
如果不是,那就用API吧
 
这样:
messagebox(0,'how do you do???','ok',mb_okcancel or MB_DEFBUTTON2);
 
俺混分..
Application.MessageBox('你好吗?','询问',MB_OKCANCEL + MB_ICONQUESTION +MB_DEFBUTTON2 );
 
引用单元:QDialogs
MessageDlg('你好',mtConfirmation,[mbYes,mbNo],0,mbNo,nil);
 
如果还需要程序界面在提示框关闭之前无法得到焦点,就这样:
messagebox(0,'how do you do???','ok',mb_okcancel or MB_DEFBUTTON2 or MB_TASKMODAL);
如果还需要加上信息图标,就这样:
messagebox(0,'how do you do???','ok',mb_okcancel or MB_DEFBUTTON2 or MB_TASKMODAL or MB_ICONINFORMATION);
 
Application.MessageBox('你好', 'WELCOME',
MB_OKCANCEL + MB_DEFBUTTON2)

如果你有三个按钮,还可以用MB_DEFBUTTON3
:)
 
多人接受答案了。
 
后退
顶部