对话框如何带自定义的标题

对话框怎么带自定义的标题？
我所知道的showmessage和messagedlg的对话框标题都是以工程名为标题的，能够带自定义标题的messagebox有个缺陷，就是内容部支持带String格式的。

如
messagebox(Application.Handle, 'abc！error=0003 '+Edit1.tex, '提示： ',   MB_ICONEXCLAMATION);
不行，


只能是
messagebox(Application.Handle, 'abc！error=0003 ', '提示： ',   MB_ICONEXCLAMATION);
才行。




[解决办法]
messagebox(Application.Handle,pchar( 'abc！error=0003 '+Edit1.tex), '提示： ', MB_ICONEXCLAMATION);就ok!