Delphi中 弹出框的用法

时间:2023-03-09 06:30:22
Delphi中 弹出框的用法

Delphi中的提示框有 Application.MessageBox  ShowMessage messagedlg

个人认为 相对来说 Application.MessageBox 更加灵活 也相对好用

Application.MessageBox('错误信息!', '提示', MB_ICONERROR);
Application.MessageBox('确认信息?', '提示', MB_YESNO or MB_ICONQUESTION or MB_DEFBUTTON2);

focus在No按钮上
返回值:  idYes  idNo

原文链接:

https://www.cnblogs.com/zs-note/articles/5050737.html

这里有详细的介绍 感谢大神的分享