摘要: ifMessageDlg('Welcome to my Delphi application. Exit now?', mtConfirmation, [mbYes, mbNo], 0) = mrYes thenbeginClose; end;MessageDlg用法对话框类型:mtwarning—... 阅读全文
posted @ 2015-07-20 16:01 海蓝7 阅读(338) 评论(0) 推荐(0) 编辑