delphi中messagebox的详细用法

发布网友 发布时间：2022-04-22 04:22

我来回答

共4个回答

热心网友 时间：2023-09-20 14:10

if MessageBox(Handle, '要删除选中的信息吗？', '确认', MB_ICONQUESTION + MB_YESNO + MB_DEFBUTTON2) = IDYES then
begin
//用户点击“是”执行这里的代码
end;
第一个参数是对话框父窗口的句柄
第二个参数是对话框显示的文本内容
第三个参数是对话框的标题内容
第四个参数可以设置对话框的样式，比如提示类型是出错啊 还是信息啊 或者询问啊 显示哪些按钮啊 默认选中哪个按钮啊 这些都由第四个参数决定。
细想的内容 Delphi 的帮助文档里面可以查到。

热心网友 时间：2023-09-20 14:11

使用messagebox有时会出现莫名其妙的麻烦,建议你使用messagedlg.
if messagedlg(' 确实要删除此人信息吗?'+
'要删除，请按“yes”按钮；否则，请按“no”按钮退出此操作。',mtwarning,[mbyes,mbno],0,)=id_yes then
begin
sjmk.sjbj_1.Delete;
button25.Enabled :=false;
edit4.Text:='';
edit5.Text:='';
end;

热心网友 时间：2023-09-20 14:11

建议安装cnpack,这个是delphi编程插件，让你编程提速，并且与delphi合为一体，其中就有代码助手，快速实现你要的代码。百度里搜吧。

热心网友 时间：2023-09-20 14:12

这有虾米难？
if MessageBox(Self.Handle, '是否删除此信息?', '提示', MB_YESNO) = IDYES then
删除信息的操作...;