引言: 各位大大，我知道利用ExtractIcon（）API函数可以获得可执行档或DLL档的 Icon，如果我自己有一个图标ICON，想将原来可执行档或DLL中的icon换掉， 那么我该怎么做呢？可否提供简单的范例？谢谢！！！

以下內容「轉貼」自 Platform SDK 關鍵字「Updating Resources」 > 發表人 -

引言: 改成了hRes = FindResource(hExe, "AppIcon", RT_ANIICON); 结果找不到，我又换了RT_GROUP_ICON,RT_ICON,结果还是不行， 这是为什么呢？请PaynorPao大大指点一下可以吗？谢谢！！！ （如果这个方法可行，我觉得这个方法好一点）

引言: 非常感谢RaynorPao大大的指点，但现在还是有问题： 我已经列举到10000000还是不行，如果再往下加下去，程式检测的时间 会变的更长，有什么办法可以解决吗？再指点一下小弟我，谢谢！！！

引言: 我马上装上VC ，按照您说的再试试看。

啊~~ 不好意思~~我以為你原本就有裝 > 這樣吧~~如果你試過還有問題的話 不妨把你的 > --

引言: RaynorPao大大，我已经用VC打开test.exe档案，看到里面的ICON的ID了， 我马上测试一下您提供的程式的下面部分。啊，幸福！！！

(1)如何從 vc 中看某個 exe or dll 的 resource??
   (1.1)開啟 vc
   (1.2)選擇 file/open 出現「開啟檔案」的 dialog box
   (1.3)把「檔案類型」combobox 改成「所有文件(*.*)」
   (1.4)把「Open as」combobox 改成「Resource」
   (1.5)然後點選你要開啟的檔案(*.exe or *.dll)
   (1.6)按下「開啟」button 後，就可以看到了    ( >        >
    -- 
        

引言:

引言: RaynorPao大大，我已经用VC打开test.exe档案，看到里面的ICON的ID了， 我马上测试一下您提供的程式的下面部分。啊，幸福！！！

(3)如何列舉出 *.exe or *.dll 中的 resource type & name?? 嗯~~我怕這頁貼不下了~~我貼到下一篇吧 < face="Verdana, Arial, Helvetica"> 資料來源：M$ Platform SDK 關鍵字：「Creating a Resource List」 The following example creates a list of every resource in the Hand.exe file. The list is written to the Resinfo.txt file. The code demonstrates how to load the executable file, create a file in which to write resource information, and call the EnumResourceTypes function to send each resource type found in the module to the application-defined callback function EnumTypesFunc. See EnumResTypeProc for information on callback functions of this type. This callback function uses the EnumResourceNames function to pass the name of every resource within the specified type to another application-defined callback function, EnumNamesFunc. See EnumResNameProc for information on callback functions of this type. EnumNamesFunc uses the EnumResourceLanguages function to pass the language of every resource of the specified type and name to a third callback function, EnumLangsFunc. See EnumResLangProc for information on callback functions of this type. EnumLangsFunc writes information about the resource of the specified type, name, and language to the Resinfo.txt file. Note that the lpszType in EnumResTypeProc is either a resource ID or a pointer to a string (containing a resource ID or type name); lpszType and lpszName in EnumResNameProc are similar. To use an enumerated resource, take the resource name or ID and call the appropriate function. For example, to load a string resource (RT_STRING), if lpszName in EnumResNameProc gives the resource ID (either directly or in a string that starts with the pound sign (#)), call LoadString. Otherwise, lpszName points to a string containing the resource name, so do the following: call FindResource or FindResourceEx with the resource name to get the resource handle; call LoadResource with the resource handle to get the global handle; call LockResource with the global handle to get a pointer to the resource data. The Updating Resources code follows a similar pattern for a dialog box resource. char szBuffer[80]; // print buffer for EnumResourceTypes DWORD cbWritten; // number of bytes written to res. info. file int cbString; // length of string in sprintf // Declare callback functions. BOOL EnumTypesFunc( HANDLE hModule, LPTSTR lpType, LONG lParam); BOOL EnumNamesFunc( HANDLE hModule, LPCTSTR lpType, LPTSTR lpName, LONG lParam); BOOL EnumLangsFunc( HANDLE hModule, LPCTSTR lpType, LPCTSTR lpName, WORD wLang, LONG lParam); // Load the .EXE whose resources you want to list. hExe = LoadLibrary("hand.exe"); if (hExe == NULL) { ErrorHandler("Could not load .EXE."); } // Create a file to contain the resource info. hFile = CreateFile("resinfo.txt", // name of file GENERIC_READ | GENERIC_WRITE, // access mode 0, // share mode (LPSECURITY_ATTRIBUTES) NULL, // no security CREATE_ALWAYS, // create flags FILE_ATTRIBUTE_NORMAL, // file attributes (HANDLE) NULL); // no template if (hFile == INVALID_HANDLE_VALUE) { ErrorHandler("Could not open file."); } // Find all of the loaded file's resources. cbString = sprintf(szBuffer, "The file contains the following resources:\n\n"); WriteFile(hFile, // file to hold resource info. szBuffer, // what to write to the file (DWORD) cbString, // number of bytes in szBuffer &cbWritten, // number of bytes written NULL); // no overlapped I/O EnumResourceTypes(hExe, // module handle (ENUMRESTYPEPROC)EnumTypesFunc, // callback function 0); // extra parameter // Unload the executable file whose resources were // enumerated and close the file created to contain // the resource information. FreeLibrary(hExe); CloseHandle(hFile); // FUNCTION: EnumTypesFunc(HANDLE, LPSTR, LONG) // // PURPOSE: Resource type callback BOOL EnumTypesFunc( HANDLE hModule, // module handle LPTSTR lpType, // address of resource type LONG lParam) // extra parameter, could be // used for error checking { int cbString; // Write the resource type to a resource information file. // The type may be a string or an unsigned decimal // integer, so test before printing. if ((ULONG)lpType & 0xFFFF0000) { cbString = sprintf(szBuffer, "Type: %s\n", lpType); } else { cbString = sprintf(szBuffer, "Type: %u\n", (USHORT)lpType); } WriteFile(hFile, szBuffer, (DWORD) cbString, &cbWritten, NULL); // Find the names of all resources of type lpType. EnumResourceNames(hModule, lpType, (ENUMRESNAMEPROC)EnumNamesFunc, 0); return TRUE; } // FUNCTION: EnumNamesFunc(HANDLE, LPSTR, LPSTR, LONG) // // PURPOSE: Resource name callback BOOL EnumNamesFunc( HANDLE hModule, // module handle LPCTSTR lpType, // address of resource type LPTSTR lpName, // address of resource name LONG lParam) // extra parameter, could be // used for error checking { int cbString; // Write the resource name to a resource information file. // The name may be a string or an unsigned decimal // integer, so test before printing. if ((ULONG)lpName & 0xFFFF0000) { cbString = sprintf(szBuffer, "\tName: %s\n", lpName); } else { cbString = sprintf(szBuffer, "\tName: %u\n", (USHORT)lpName); } WriteFile(hFile, szBuffer, (DWORD) cbString, &cbWritten, NULL); // Find the languages of all resources of type // lpType and name lpName. EnumResourceLanguages(hModule, lpType, lpName, (ENUMRESLANGPROC)EnumLangsFunc, 0); return TRUE; } // FUNCTION: EnumLangsFunc(HANDLE, LPSTR, LPSTR, WORD, LONG) // // PURPOSE: Resource language callback BOOL EnumLangsFunc( HANDLE hModule, // module handle LPCTSTR lpType, // address of resource type LPCTSTR lpName, // address of resource name WORD wLang, // resource language LONG lParam) // extra parameter, could be // used for error checking { HANDLE hResInfo; char szBuffer[80]; int cbString = 0; hResInfo = FindResourceEx(hModule, lpType, lpName, wLang); // Write the resource language to the resource information file. cbString = sprintf(szBuffer, "\t\tLanguage: %u\n", (USHORT)wLang); WriteFile(hFile, szBuffer, (DWORD) cbString, &cbWritten, NULL); // Write the resource handle and size to buffer. cbString = sprintf(szBuffer, "\t\thResInfo == %lx, Size == %lu\n\n", hResInfo, SizeofResource(hModule, hResInfo)); WriteFile(hFile, szBuffer, (DWORD) cbString, &cbWritten, NULL); return TRUE; } -- Enjoy Researching & Developing --

引言: RaynorPao大大,按照您说的直接用ID名可以过去，但在下面的地方受阻： hUpdateRes = BeginUpdateResource("C:\\My Documents\\\\test1.exe", FALSE);

我的可以啊~~ 我把以上的程式修改了一下 把你寄來的 class="code"> HINSTANCE hDll=NULL; HRESULT hr=S_FALSE; HRSRC hResInfo=NULL; HRSRC hResLoad=NULL; HRSRC hResUpdate=NULL; LPBYTE lpBuf=NULL; // Load library hDll=LoadLibrary("test.exe"); // Find resource hResInfo=FindResource((HMODULE)hDll, "MAINICON", RT_GROUP_ICON); // Load resource hResLoad=(HRSRC)LoadResource((HMODULE)hDll, hResInfo); // Lock resource lpBuf=(LPBYTE)LockResource(hResLoad); // Begin update resource. hResUpdate=(HRSRC)BeginUpdateResource("test41.dll", FALSE); // Update resource UpdateResource(hResUpdate, RT_GROUP_ICON, "MAINICON", MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), lpBuf, SizeofResource(hDll, hResInfo)); // End update resource EndUpdateResource(hResUpdate, FALSE); FreeLibrary(hDll); --

引言: RaynorPao大大您好，我快要疯了， 按照您贴的代码，我在BCB中测试，结果问题和前面我说的 一样，这是怎么回事？难道和操作系统有关吗？（我的是WIN98） 如果您有时间可以的话，可以将您的BCB原始码发给我吗？ 我看看问题究竟出在什么地方呢？真是奇怪了。先谢谢您。

基本上~~我上面寫的程式碼 在 vc 或 bcb 中執行是沒有什麼差別的 我先問你一個問題喔 你執行到 > --

引言: I_Love_You你好： 我必須告訴你一個不好的消息~~經過我的測試以後 我發現以現行的方式~~要 update *.ime 的 resource 似乎是不可能的 在 M$DN or M$ Platform SDK 中有提到 包括 LoadLibrary, BeginUpdateResource...等這些 function 都是針對 DLL/EXE 所設計的 所以~~我之前用 vc 寫的 DLL/EXE 都可以成功的 update 但是~~一碰到你寄來的 IME 就不行了 Researching & Developing --

Delphi有個Demo→Resxplor目錄裡，可以做到這樣的事，不曉得BCB有沒有此Demo或許你可以將他改成BCB版的吧。

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.taconet.com.tw/jieshu/

引言: 非常jieshu大大指点信息，我在BCB中找了一下没有您说的这个目录和这样的范例， 您如果有时间可以将您说的Demo→Resxplor目录下这样的范例压缩一下发给我参考吗？谢谢您，谢谢！！！

我放在會員專用區，不曉得你可不可以下載，位址如下 http://delphi.ktop.com.tw/loadfile.php?TOPICID=7122641&CC=159299

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.taconet.com.tw/jieshu/