Delphi中messagedlg是干什么的,怎么使用它?

来源:百度知道 编辑:UC知道 时间:2024/06/03 05:30:28
Delphi中messagedlg是干什么的,怎么使用它?能举个简单的例子吗?谢谢。

是用来弹出提示框,并返回用户的选择的

if MessageDlg('Welcome to my Delphi application. Exit now?',
mtConfirmation, [mbYes, mbNo], 0) = mrYes then
begin

Close;
end;

继承 messbox的一个类