关于showmessage和messagedlg标题栏的问题（50分）

[patriotcncn]

showmessage和messagedlg标题栏里的默认标题是在有些不雅，如果改写？各位多多指教。

[zzheaptech]

application.MessageBox('cc','dd',0)

[newant]

showmessage 的标题栏，不好改，（需要api）
messagebox 的可以
例：
MessageBox(' 标题内容‘,mtinformation,[mbyes],0);

[tommy_linux]

application.title:='您输入错误了!';
showmessage('ok');


Application.MessageBox('要显示的信息','标题',对话框的按钮和图标);
Application.MessageBox('系统出现查询错误！','错误',MB_OK+MB_ICONERROR);

[oracle_lover]

1. 随便新建一个工程
2. 打开...\Borland\Delphi6\Source\Vcl\Consts.pas，将其加入工程，保存此工程
3. 看看Consts.pas，都是英文，改成中文：
例如SMsgDlgWarning = 'Warning';
改成SMsgDlgWarning = '警告';
4. 编译此工程，将生成的Consts.dcu拷贝到...\Borland\Delphi6\Lib中覆盖原文件
5. 重起Delphi，看效果

[patriotcncn]

各位，我指的是messagedlg,不是messagebox呀。