[讨论]：修改了2002的ACAD.EXE的资源里的ACAD的图标

fylinwater

我用VC修改了2002的ACAD.EXE的资源里的ACAD的图标，结果ACAD2002启动后让我看到了修改的结果后马上就悄悄的退出了。好像是故意气我的。
谁知道怎么修改－－－－－好奇想玩玩而已。

dwjnet

其实，修改软件较多。
1。pexplorer.exe
2.iconscope
3.直接写一个arx程序,在autocad启动时，自动运行加载，动态修改

fylinwater

直接写？
能否介绍？

dwjnet

// ObjectARX EntryPoint
extern "C" AcRx::AppRetCode
acrxEntryPoint(AcRx::AppMsgCode msg, void* pkt)
{
        switch (msg) {
        case AcRx::kInitAppMsg:
                //丁文捷按旧版本写的，SplashScreen才可用！
AfxSetResourceHandle (::GetModuleHandle ("arxcam.arx")) ;
                CSplashScreen::EnableSplashScreen (TRUE) ;
                CSplashScreen::ShowSplashScreen (acedGetAcadFrame ()) ;
                AfxSetResourceHandle (acedGetAcadResourceInstance ()) ;
                //SplashScreen写完了
                // Comment out the following line if your
                // application should be locked into memory
                acrxDynamicLinker->unlockApplication(pkt);
                acrxDynamicLinker->registerAppMDIAware(pkt);
                InitApplication();
                break;
        case AcRx::kUnloadAppMsg:
                UnloadApplication();
                break;
        }
        return AcRx::kRetOK;
}


// Init this application. Register your,
// commands, reactors...
void InitApplication()
{
        // NOTE: DO NOT edit the following lines.
        //{{AFX_ARX_INIT
        AddCommand("ARXHCHCAM", "SEARCHER", "SEARCHER", ACRX_CMD_TRANSPARENT | ACRX_CMD_USEPICKSET, arxhchcamsearcher);
        AddCommand("ARXHCHCAM", "CAPTION", "CAPTION", ACRX_CMD_TRANSPARENT | ACRX_CMD_USEPICKSET, arxhchcamcaption);
        //}}AFX_ARX_INIT

        // TODO: add your initialization functions
arxhchcamcaption();//自建的命令在这里运行
}




// This is command 'CAPTION, by  [十一月/26/2002], ,
void arxhchcamcaption()//一个自建的命令
{
#ifdef OARXWIZDEBUG
        acutPrintf ("\nOARXWIZDEBUG - arxhchcamcaption() called.");
#endif // OARXWIZDEBUG
CMDIFrameWnd *pp;
pp=acedGetAcadFrame();
pp->SetWindowText ("GT裁床CAM");
pp->UpdateWindow ();

hicon = AfxGetApp()->LoadIcon(IDI_ICON1);//IDI_ICON1要事先导入
pp->SetIcon(hicon,1);
pp->SetIcon(hicon,0);
//free(pp);
        // TODO: Implement the command

}

fylinwater

如何再将原来ACAD的图标恢复那？
就是如何获取acad的图标？

stoneball

我以前也试过，也是一闪而过，终于...

土土土

给dwjnet 加五分

dwjnet

最初由 fylinwater 发布
[B]如何再将原来ACAD的图标恢复那？
就是如何获取acad的图标？ [/B]

我考虑了一下,还未成熟.
如果再改变图标之前获取其资源id,通过程序保留下来,就可以再动态恢复acad的图标.
用那些图标查看软件也可得到资源id,需要时,就可以加载.
我用最简单的笨笨办法:先用一些软件保存这些图标(ACAD的图标)
也是供我随时加载,骗人!
希望获得指导!

fylinwater

呵呵跟我的想法一样，
“如果再改变图标之前获取其资源id”
我找了MSDN没有找到相关的函数，不知道怎么获取资源（当然主要是我对VC不是很熟练）