lovezcs 发表于 2003-10-10 22:35:00

如何改变CAD的图标

我想改变]
CAD主窗口的图标
请问如何做
谢谢

efan2000 发表于 2003-10-10 23:05:00

先使用LoadImage创建一个图标实例,然后使用SendMessage,后面跟WM_SETICON参数,发送消息更改图标。

lovezcs 发表于 2003-10-12 11:14:00

可以详细说一下
或者举个例子吗?

efan2000 发表于 2003-10-12 14:33:00

我不会C,在VBA中是通过调用API来实现的。
在VC++中应该也是类似的吧,程序可能更简单点。


Private Declare Function LoadImage Lib "user32" Alias "LoadImageA" (ByVal hInst As Long, ByVal lpsz As String, ByVal un1 As Long, ByVal n1 As Long, ByVal n2 As Long, ByVal un2 As Long) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal Hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_SETICON = &H80
Private Const IMAGE_ICON = 1
Private Const LR_LOADFROMFILE = &H10

Public Sub SetIcon()
    Dim hIcon As Long
   
    'FileName 图标文件, HwndACAD应用程序的句柄
    hIcon = LoadImage(0&, FileName, IMAGE_ICON, 16, 16, LR_LOADFROMFILE)
    If hIcon <> 0 Then
      Call SendMessage(Hwnd, WM_SETICON, 0, ByVal hIcon)
    End If
End Sub

wql 发表于 2003-12-25 21:02:00

请教如何用VC编写改变CAD标题栏图标的程序?

中国虫 发表于 2003-12-26 19:54:00

HICON hIcon=::LoadIcon(_hdllInstance,MAXKEINTRESOURCE(IDI_XXX));//IDI_XXX是图标资源ID,具体LoadIcon的详细解释请参见MSDN
acedGetAcadFrame()->SetIcon(hIcon,FALSE);

wql 发表于 2003-12-27 06:30:00

MSDN哪有说明?

中国虫 发表于 2003-12-27 09:50:00

MSDN的字面意思就不解释了,从一个方面可以理解为Visual Studio的帮助。这是一个Windows开发的全书,如果你连LoadIcon都找不到,很难想象如何自己编程序。
页: [1]
查看完整版本: 如何改变CAD的图标