delphi Messagebox对话框显示 “确定”“取消”

delphi

1505

2023/12/19 17:41:58

栏目: 编程语言

可以使用以下代码在Delphi中显示一个MessageBox对话框，其中包含"确定"和"取消"按钮：

var
??ButtonSelected:?Integer;
begin
??ButtonSelected?:=?MessageDlg('确定要执行此操作吗？',?mtConfirmation,?[mbYes,?mbNo],?0);
??if?ButtonSelected?=?mrYes?then
??begin
????//?点击了"确定"按钮
????//?执行相应的操作
??end
??else
??begin
????//?点击了"取消"按钮或关闭对话框
????//?执行相应的操作
??end;
end;

以上代码将显示一个对话框，标题为"确定要执行此操作吗？"，并包含"确定"和"取消"两个按钮。根据用户选择的按钮，代码将执行相应的操作。如果用户点击了"确定"按钮，ButtonSelected的值将为mrYes，如果用户点击了"取消"按钮或关闭了对话框，ButtonSelected的值将为mrNo。

辰迅云「云服务器」，即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘，价格低至29元/月。点击查看>>

delphi Messagebox对话框显示 “确定”“取消”

最新知识库

相关标签