VC模仿按键精灵释放资源中某类型的文件

塞翁364

/************************************************************************/
/* 函数说明：释放资源中某类型的文件                                    
/* 参    数：新文件名、资源ID、资源类型                                 
/* 返 回 值：成功返回TRUE，否则返回FALSE                           
/************************************************************************/
BOOL Shifang(CString strFileName,WORD wResID,CString strFileType); //参数1新文件名路径.路径必须存在,参数2,ID,参数三3文件类型
添加资源文件,模仿按键精灵释放文件,回复查看源码;

1. BOOL Shifang(CString strFileName,WORD wResID,CString strFileType) //参数1新文件名路径.路径必须存在,参数2,ID,参数三3文件类型
   
2. {
   
3. // 资源大小
   
4. DWORD dwWrite=0;
   
5. // 创建文件
   
6. HANDLE hFile = CreateFile(strFileName, GENERIC_WRITE,FILE_SHARE_WRITE,NULL,CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,NULL);
   
7. if ( hFile == INVALID_HANDLE_VALUE )
   
8. {
   
9. return FALSE;
   
10. }
    
11. // 查找资源文件中、加载资源到内存、得到资源大小
    
12. HRSRC hrsc = FindResource(NULL, MAKEINTRESOURCE(wResID), strFileType);
    
13. HGLOBAL hG = LoadResource(NULL, hrsc);
    
14. DWORD dwSize = SizeofResource( NULL, hrsc);
    
15. // 写入文件
    
16. WriteFile(hFile,hG,dwSize,&dwWrite,NULL);
    
17. CloseHandle( hFile );
    
18. return TRUE;
    
19. }

复制代码