Pessoal é possivel fazer uma lista dos Bmp de uma dll?´
se possivel posso imprimir esses bmps tambem?
Listar bmps de uma dlls
Listar bmps de uma dlls
Marcelo Michels Alexandre
xHarbour 1.1 + Ws + Xmate + FW8.01 + BCC 5.82
xHarbour 1.1 + Ws + Xmate + FW8.01 + BCC 5.82
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
Voce pode experimentar :
Code: Select all
........
aBitMaps := EnumResourcesBitMap()
................
#pragma BEGINDUMP
#include <WinTen.h>
#include <windows.h>
#include <CommDlg.h>
#include <ClipApi.h>
static far int nResourceIndex = 0;
static far BOOL bGetName = FALSE;
static int CALLBACK EnumResourceFunc( HANDLE hModule, // resource-module handle
LPCTSTR lpszType, // pointer to resource type
LPTSTR lpszName, // pointer to resource name
LONG lParam // application-defined parameter
)
{
#ifdef __XPP__
void * params = _params;
#endif
++nResourceIndex;
if ( bGetName )
_storc( lpszName, -1, nResourceIndex );
return 1;
}
HB_FUNC( ENUMRESOURCESBITMAP )
{
ENUMRESNAMEPROC lpEnumResourceFunc = ( ENUMRESNAMEPROC )
MakeProcInstance( ( FARPROC ) EnumResourceFunc, GetInstance() );
// Get the number of recurs bitmap
nResourceIndex = 0;
bGetName = FALSE;
EnumResourceNames( NULL, RT_BITMAP, lpEnumResourceFunc, NULL );
// Get the recurso bitmap names
_reta( nResourceIndex );
nResourceIndex = 0;
bGetName = TRUE;
EnumResourceNames( NULL, RT_BITMAP, lpEnumResourceFunc, NULL );
FreeProcInstance( ( FARPROC ) EnumResourceFunc );
}
#pragma ENDDUMP