messageBox 中显示变量及实现换行

前言

总结下今天使用messageBox过程中解决的一些问题，共勉。

messageBox格式使用请参考：

delphi中Application.MessageBox函数用法详解

1、显示变量

直接上干货（代码）：

vars:string;
....
s:='存档失败';
Application.MessageBox(PChar(s),'错误',MB_ICONERROR);

//窗口标识可以含多个，例如下面表示带问号，同时含有yes和no两个按钮
Application.MessageBox('要保存文件内容吗？', '保存', MB_YESNO or MB_ICONQUESTION);
           

进阶版：变量和字符混用

MessageBox(Handle,Pansichar('议价后应收，请核对！' +edtYJ.Text),'提示',MB_OKCANCEL);
           

2、换行

方式一：

MessageBox(Handle,Pansichar('议价后应收，请核对！'+ ''#'' +edtYJ.Text),'提示',MB_OKCANCEL);
           

方式二：

MessageBox(Handle,Pansichar('议价后应收，请核对！'+#13#10 +edtYJ.Text),'提示',MB_OKCANCEL);
           

效果如图：

以上是个人总结所得，若有不当之处，请在评论中指出。