对话框如何带自定义的标题
对话框怎么带自定义的标题?
我所知道的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!
我所知道的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!