2020年9月15日
Delphi中Messagedlg用法
摘要： 1 if MessageDlg('即将退出，是否继续？', 2 mtConfirmation, [mbYes, mbNo], 0) = mrYes then 3 begin 4 Close; 5 end; 对话框类型： mtwarning——含有感叹号的警告对话框 mterror——含有红色叉符号的 阅读全文
posted @ 2020-09-15 10:32 Thenext 阅读(389) 评论(0) 推荐(0)