本文整理自网络,侵删。
123456MessageDlg ('今天天气:'+#13+' very good!', TMsgDlgType.mtInformation, [TMsgDlgBtn.mbOk], 0, procedure(const AResult:TModalResult) begin if AResult=mrOk then ShowMessage('ok') else ShowMessage('No'); end);
创建时间:2020.06.04 更新时间:
博客园 滔Roy https://www.cnblogs.com/guorongtao
相关阅读 >>
Delphi 为 service application 添加描述文本的方法
Delphi indy 10tidftp中的directorylisting使用
Delphi runasadmin 运行程序并申请管理员权限
Delphi fileopendialog1 多选加载大量文件,不受中文文件名影响
更多相关阅读请进入《Delphi》频道 >>