怎样自定义对话框？

Question

请修改目录 delphi\source\vcl\controls中所有的'ok','cancel','abort',之类的东东改为你所要的Caption;如果想要修改字体,请修改目录:delphi\source\vcl\graphics.pas 文件中的procedure InitDefFontData;为你所要的字体

Answer 1

鸭子兄，你在开玩笑，公司不允许修改Delphi自带文件不消说，何况这样做只是权宜之计，通用性很差，如果可以随便乱改源文件，我也不发这帖子了，关注。

Answer 2

你可以看一下\Boland\Delphi5\Source 目录下的那些名为 *const.pas的原文件，再那里定义了一些常量，你可以将他翻译成中文，并从新编译修改过的 .pas 文件替换掉原来对应的 .dcu文件。我想你把 ok 改为‘确定’应该还是具有通用性吧，呵呵......
caption 也是可以改的，我也经常这样用，效果还不错,祝你成功

Answer 3

正如你所说，除非修改源文件，否则只能自己建立 Form 了。

Answer 4

办法是自己做一个 FORM 来作为对话框

Answer 5

为什么要修改MessageDlg或Messagebox对话框?想用中文吗?
if Application.MessageBox('你真的想确定吗？','询问',MB_OKCANCEL+MB_ICONQUESTION)=IDOK then
...
MB_OKCANCEL(OK,CANCEL,YES,NO,IGNORE,RETRY)//将显示中文
MB_ICONQUESTION(INFORMATION 信息,STOP 禁止,QUESTION 提问,WARNING 警告)//将显示图标

Answer 6

那你用TForm来做啊，VCL中也是用它来做的，不过就是计算出输出的内容来了。
你可根据情况先做一个Form1,然后摆好它里面的东东，像label,edit
然后可以看窗体文件的各单位的top,left.
然后用Form.InsertControl(label1 or edit1)就可实现所要界面了。
  

Answer 7

做成Form形式，怎样实现类似对话框，没有最大化、最小化等按钮，只能移动和关闭，并且一直位于最前呢？

Answer 8

做一个通用对话框(Dll),把Caption作为参数传入，然后在程序中调用即可

Answer 9

我有用Form 做成的消息框的源代码。
先把分给我吧。
E-Mail: [email protected]

Answer 10

做成Form形式，设置：
  Form.BorderStyle := bsDialog;  // 没有最大化、最小化按钮
  Form.FormStyle := fsStayOnTop; // 置于最前显示时，Form.ShowModal;

Answer 11

对，用WIN　API函数中的MessageBox函数
就可以你。具体用法你可以查看DELPHI中的WINDOWS　SDK　帮助。