Application.MessageBox('提示信息:由于显示器分辨率不匹配,'+#10+#13+'系统将关闭,请调整为800*600...','提示',0);换行#10+#13
如有取值什么的愿闻其详.hehe
如有取值什么的愿闻其详.hehe
解决方案 »
- delphi xe2 封装压缩工具7z接口 问题请教
- 新人报到
- 這樣的調用存儲過程為何參數傳不過去?我只有這麼多分,請高手指點!
- 只是显示name 为 navy 的数据记录总数。
- 100分请问一系统是用两层还是用三层好?欢迎讨论!
- DELPHI7里的报表设计器在哪里?怎么没有看到QUICKREPORT?
- 建立本地表的问题,本机正常,客户使用出问题???
- 多台计算机能否共用一个加密狗?(高手们帮忙啊)
- 怎么使任意控件处于设计状态(可拖动、改变大小)
- 快,,快,,快,,,进来帮助我这个可怜的人
- 急需delphi编写的dll源码来学习,望高手们指点一二(哪里有好的学习代码下载?)
- 怎么不能搜索了?总是提示服务器忙!
messagebox信息本身就是pchar或者string当然可以加变量显示了
这是换行
把变量加到字符串里就可以
#10#13为回车换行
让application.messagebox中显示如下,其中的100用变量来显示.
现有一个整型变量
a=100!运算完毕!
Application.MessageBox(pchar('提示信息:'+#10+#13+str),'提示',0);
b:string;
c:string;
d:integer;
begin
d:=100;
b:='现有一个整型变量'+#13+#10+'a='+IntToStr(d)+'!运算完毕!';
application.messagebox(pchar(b),'提示',0);