P
passcaer
Unregistered / Unconfirmed
GUEST, unregistred user!
delphi中弹出窗口的标题'project'好难看，我想把那个标题更改一下，重分请高手帮忙，要求，我知道用application.messagebox('内容','标题')这种方法可以，但是现在我不想用这个方法，如果有谁能给出有效的方法的话，200分全部归他所有
您正在使用一款已经过时的浏览器！部分功能不能正常使用。
请尝试升级或使用 其他浏览器。
请尝试升级或使用 其他浏览器。
杯
杯中水
Unregistered / Unconfirmed
GUEST, unregistred user!
可以创建一个新的窗口，改变窗口的标题
P
passcaer
Unregistered / Unconfirmed
GUEST, unregistred user!
不明白，而且我是要更改弹出窗口的标题，而不是Form窗口的标题
J
jackalwin
Unregistered / Unconfirmed
GUEST, unregistred user!
application.messagebox();
B
bbscom
Unregistered / Unconfirmed
GUEST, unregistred user!
可以根据你的需要将ShowMessage改为你自己需要的函数MessageBox。
也就是执行ShowMessage就会自动执行MessageBox同样的效果。
技术交流QQ：136293586
也就是执行ShowMessage就会自动执行MessageBox同样的效果。
技术交流QQ：136293586
冰
冰力不足
Unregistered / Unconfirmed
GUEST, unregistred user!
@@@ 垃圾
P
passcaer
Unregistered / Unconfirmed
GUEST, unregistred user!
冰力不足大虾能不能说得明白些，代码太看不明白
雪
雪雕
Unregistered / Unconfirmed
GUEST, unregistred user!
你可以选择菜单里的project|option，然后在application页面的Title里修改程序的标题，以后showmessage的标题就会改了
冰
冰力不足
Unregistered / Unconfirmed
GUEST, unregistred user!
@@@
P
passcaer
Unregistered / Unconfirmed
GUEST, unregistred user!
按照雪雕的方法的做的话，会把所有的弹出窗口的标题都改成同一个了，我想让每一个弹出窗口的名字都不是一样的，还有办法么？急
R
rwlin
Unregistered / Unconfirmed
GUEST, unregistred user!
自定义一个窗体样式作为弹出窗体，这不难吧，呵呵
可以写一个通用函数；
可以写一个通用函数；
B
bbscom
Unregistered / Unconfirmed
GUEST, unregistred user!
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
procedure ShowMessage(const Msg: string); overload;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.ShowMessage(const Msg: string);
begin
Application.MessageBox(PChar(Msg), PChar('我的标题'),
MB_ICONASTERISK + MB_OK);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('Delphi 我爱你！！！');
end;
end.
也可以设计你自己喜欢的BOX Form。
技术交流QQ：136293586
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
procedure ShowMessage(const Msg: string); overload;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.ShowMessage(const Msg: string);
begin
Application.MessageBox(PChar(Msg), PChar('我的标题'),
MB_ICONASTERISK + MB_OK);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('Delphi 我爱你！！！');
end;
end.
也可以设计你自己喜欢的BOX Form。
技术交流QQ：136293586
P
passcaer
Unregistered / Unconfirmed
GUEST, unregistred user!
能不能bbscom大虾再帮一忙：我想自己做一个我喜欢的BOX Form，可是哪里有相关的详细的学习资料呢？请bbscom大虾送佛送到西吧，给我指一条学习的道路吧，谢谢了
T
terryapp
Unregistered / Unconfirmed
GUEST, unregistred user!
请问你为什么不想用MessageBox？？？
我觉得没有很特殊的需求啊？
想做个BOX Form，你把Delphi自带的Dialogs.pas看一下就可以了！
我觉得没有很特殊的需求啊？
想做个BOX Form，你把Delphi自带的Dialogs.pas看一下就可以了！
Q
qizhao_2001
Unregistered / Unconfirmed
GUEST, unregistred user!
用API吧,MessageBoxEx
S
sbzldlb
Unregistered / Unconfirmed
GUEST, unregistred user!
哎，用messagebox(handle,'选用messagebox吧！','注意',mb_ok)
P
passcaer
Unregistered / Unconfirmed
GUEST, unregistred user!
我只是一只小小的菜鸟，里面有很多的代码都看不懂，我不是没有毅力和耐心，而是我没有这么多的时间来研究这些东西，我还有很多的别的事情要做，所以有没有比较简单易懂的学习资料呢？
T
terryapp
Unregistered / Unconfirmed
GUEST, unregistred user!
。。。建议你问问你同事。。。
好象总觉得你现在想的问题有点。。。
刚开始就要脚踏实地，不要异想天开。。。
看看上面其他tx怎么说的，自己动手试一试，再说。。。
好象总觉得你现在想的问题有点。。。
刚开始就要脚踏实地，不要异想天开。。。
看看上面其他tx怎么说的，自己动手试一试，再说。。。
B
bbscom
Unregistered / Unconfirmed
GUEST, unregistred user!
你喜欢的Box Form就直接修改我给写的函数改动一下就实现了。
技术交流QQ：136293586
技术交流QQ：136293586
S
sbzldlb
Unregistered / Unconfirmed
GUEST, unregistred user!
想深入，但不想花时间，不行地