修改系统对话框的图标？(190分)

新黛飞 · 2002-03-16

我想修改系统消息对话框（警告、问题等）的图标，把他改为我的程序的图标。怎么办？ 另外，如何修改其他通用对话框（open save）中的内容，比如加一个icon，就像winamp。 谢了

zhihuali · 2002-03-16

自制一个对话框窗体。

完颜康 · 2002-03-16

制作显示自己图标的MessageBox //这个Tip是我从中国计算机报DelphiTips得到的，很有意思，于是便保存了下来。 function MessageBoxLg(Handle:integer;Text,Caption:String;flag:integer):integer; var   Msg:TMsgBoxParams; begin  Msg.cbSize:=Sizeof(Msg);  Msg.hwndOwner:=Handle;  Msg.hInstance:=hinstance;  Msg.lpszText:=PChar(Text);  Msg.lpszCaption:=PChar(Caption);  Msg.dwStyle:=flag+MB_USERICON;  Msg.lpszIcon:='MAINICON';  Msg.dwContextHelpId:=1;  Msg.lpfnMsgBoxCallback:=nil;  Msg.dwLanguageId:=LANG_NEUTRAL;  Result:=integer(MessageBoxIndirect(Msg)); end; //////////以上出自葵花宝点

D影子D · 2002-03-16

其他的自己做,一个filelist加drivecombo控件就可以作了！

gxcooo · 2002-03-16

自己做[

]

新黛飞 · 2002-03-26

:完颜康 此方法在win2k中不行，不能弹出对话框。

GanQuan · 2002-03-29

>>此方法在win2k中不行，不能弹出对话框。 可以 procedure TForm1.Button1Click(Sender: TObject); begin  MessageBoxLg(Handle,'dfd','dsfsd',0);  MessageBoxLg(Handle,'dfd','dsfsd',1);  MessageBoxLg(Handle,'dfd','dsfsd',2); end;

searoom · 2002-03-28

Msg.lpszIcon:='MAINICON'; 这句是不是定义图标的意思？ 那为什么用字符串呢？

新黛飞 · 2002-03-28

我试验了，在Win2k和WinXP下可以弹出对话框，但是不能显示图标，显示图标的地方是空的。 是不是Msg.lpszIcon:='MAINICON';这行有问题？似乎把MAINICON改成任意的字符串，都一样。

新黛飞 · 2002-06-09

接受答案了.

abclililove · 2003-06-19

请问怎样在上例中设置自定义的icon?

abclililove · 2003-06-19

Msg.lpszIcon:='MAINICON'这东东怎么用？

修改系统对话框的图标？(190分)

新黛飞

Unregistered / Unconfirmed

zhihuali

Unregistered / Unconfirmed

完颜康

Unregistered / Unconfirmed

D影子D

Unregistered / Unconfirmed

gxcooo

Unregistered / Unconfirmed

新黛飞

Unregistered / Unconfirmed

GanQuan

Unregistered / Unconfirmed

searoom

Unregistered / Unconfirmed

新黛飞

Unregistered / Unconfirmed

新黛飞

Unregistered / Unconfirmed

abclililove

Unregistered / Unconfirmed

abclililove

Unregistered / Unconfirmed

Similar threads