如何汉化messagedlg中的按钮?

Qcj 2000-04-26 06:22:00

...全文

171 5 打赏收藏转发到动态举报

写回复

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

zdyue 2000-04-29

打赏
举报

回复

在delphi得安装目录中找到const.pas(好像是)
修改之，要求工程编译源文件

billie 2000-04-28

打赏
举报

回复

找到该函数所在的PAS文件，汉化相应的英文后，编译成DCU就可以了。
找PAS文件的方法：在任何一个源程序中按住CTRL键，在函数上按鼠标左键就行了。

liujh_ty 2000-04-27

打赏
举报

回复

Application.MessageBox可以

wdh 2000-04-26

打赏
举报

回复

Application.MessageBox('My String','My caption',MB_OK);也可以

LittleStar 2000-04-26

打赏
举报

回复

MessageBox(Handle,'My String','My caption',MB_OK);

messageDlg, 是在对话框显示消息，并等待用户点击一个按钮，然后返回一个整数确定知道是那个按钮. 原型:MessageDlg(const Msg: string; DlgType: TMsgDlgType;Buttons: TMsgDlgButtons; HelpCtx: Longint): Integer Msg:想要提示的文字 DlgType:对话框的类型 Buttons:

12：如何让showmessage和messagedlg按钮中文？这个内容，比较长，所以独立出来，不放在delphi技巧中。阿佛提示：最便捷的方法是建议你使用messagebox代替。如果你用showmessage(),不用修改源程序，也能达到将文字改为汉字的效果。你可以这样： 1。编译程序，关闭程序，选择Project|Languages|Add..

if MessageDlg('Welcome to my Delphi application. Exit now?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin Close; end; MessageDlg用法对话框类型： mtwarning——含有感叹号的警告对话框

Delphi中messagedlg 日期：2009-5-25 13:38:14浏览(296) 标签：Delphi if MessageDlg('Welcome to my Delphi application. Exit now?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin ...

if MessageDlg('Welcome to my Delphi application. Exit now?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin Close; end; MessageDlg用法对话框类型： mtwarning——含有感叹号的警告对话框 mterror——含有红色叉符号的错误

5,388

社区成员

262,729

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章