Delphi三种弹窗

1： ShowMessage('  ');

缺点：标题是项目名称，不能控制

2 ：MessageBox(  handle, '内容' ,'标题' ,MB_OK);

比较常用的一个信息对话框，不仅能够显示信息内容、信息提示图标，而且可以定义按钮组合及对话框的标题

MB_OK：确定

MB_OKCANCEL：确定和取消

……

3：MessageDlg(  '内容 ', 对话框类型 , 对话框中的按钮  , 帮助)

mtwarning：含有感叹号的警告对话框

mterror：含有红色叉符号的错误对话框

……

按钮标题都是英文，如果要修改按钮文字在 consts.pas中查找：

SMsgDlgWarning='Warning';

……

改为

SMsgDlgWarning='警告';

……

重新编译consts.pas把consts.dcu拷贝到delphi的lib和slib子目录下