UC知道delphi messagebox动态显示
来源：百度知道 编辑：UC知道 时间：2024/06/19 04:18:27
如题，我想用messagebox来动态显示文本框里面的内容,程序如下
str1:=edt4.Text;
MessageBox(Handle,'用户名'''+str1+'''已经存在'+#13'请换一个用户名！','提示',MB_OK);
可是运行不了，请问给为高手怎么办啊，小弟着急啊，谢谢了！
str1:=edt4.Text;
MessageBox(Handle,'用户名'''+str1+'''已经存在'+#13'请换一个用户名！','提示',MB_OK);
可是运行不了，请问给为高手怎么办啊，小弟着急啊，谢谢了！
楼上的和问题有什么不一样吗？
应该是你忘记引用系统单元了吧。
或者
Application.MessageBox(pchar('用户名'''+str1+'''已经存在'+#13'请换一个用户名！'),
pchar(Application.Title),MB_ICONINFORMATION + mb_Ok)
试一下
MessageBox(Handle,'用户名:'+str1+':已经存在'+#13'请换一个用户名！','提示',MB_OK);