BOOL ChangeExeIcon( char* szSrcFile, int iSrcIconIndex,
                    char* szDestFile, int iDestIconIndex)
{
  HMODULE hSrcModule;
  HRSRC hSrcRes, hSrcLockRes, hSrcFindRes, hResUpdate;
  
  hSrcModule = LoadLibraryA(szSrcFile);
  if (!hSrcModule) return FALSE;
  
  __try
  {
    // 找尋指定的Icon
    hSrcFindRes = FindResource(hSrcModule, MAKEINTRESOURCE(iSrcIconIndex), RT_ICON);
    if (!hSrcFindRes) return FALSE;        // 載入指定Icon
    hSrcRes = LoadResource(hSrcModule, hSrcFindRes);
    if (!hSrcRes) return FALSE;        // 將所找到的Icon Lock到Global Memory
    hSrcLockRes = LockResource(hSrcRes);
    if (!hSrcLockRes) return FALSE;        // 更新目的檔Icon
    hResUpdate = BeginUpdateResource(szDestFile, FALSE);
    if (!hResUpdate) return FALSE;        if (!UpdateResource(hResUpdate,
                        RT_ICON,
                        MAKEINTRESOURCE(iDestIconIndex),
                        0,
                        hSrcLockRes,
                        SizeofResource(hSrcModule, hSrcFindRes))) return FALSE;        if (!EndUpdateResource(hResUpdate, FALSE)) return FALSE;
  }
  __finally
  {
    FreeLibrary(hSrcModule);
  }      return TRUE;
}    void __fastcall TForm1::Button1Click(TObject *Sender)
{
  // 一般來說Exe檔的Icon Index都是1.
  if (ChangeExeIcon("C:\\1.exe", 1, "C:\\2.exe", 1))
    ShowMessage("OK");
  else
    ShowMessage("Failed!");
}