Hola,
Yo uso esto:
- Code: Select all Expand view
*---------------------------------------------------------------*
Function GETSPECIALFOLDER(nCSIDL) // Contributed By Ryszard Rylko
*---------------------------------------------------------------*
RETURN C_getspecialfolder(nCSIDL)
*---------------------------------------------------------------*
#pragma BEGINDUMP
#include <windows.h>
#include <shlobj.h>
#include "hbapi.h"
#include "hbapiitm.h"
HB_FUNC( C_GETSPECIALFOLDER ) // Contributed By Ryszard RyRko
{
char *lpBuffer = (char*) hb_xgrab( MAX_PATH+1);
LPITEMIDLIST pidlBrowse; // PIDL selected by user
SHGetSpecialFolderLocation(GetActiveWindow(), hb_parni(1), &pidlBrowse)
;
SHGetPathFromIDList(pidlBrowse, lpBuffer);
hb_retc(lpBuffer);
hb_xfree( lpBuffer);
}
#pragma ENDDUMP
*---------------------------------------------------------------*
Así:
GETSPECIALFOLDER( CSIDL_PERSONAL )
GETSPECIALFOLDER( CSIDL_PROGRAM_FILES )
GETSPECIALFOLDER( CSIDL_FAVORITES )
GETSPECIALFOLDER( CSIDL_COMMON_FAVORITES )
GETSPECIALFOLDER( CSIDL_DESKTOPDIRECTORY )
GETSPECIALFOLDER( CSIDL_COMMON_DESKTOPDIRECTORY )
GETSPECIALFOLDER( CSIDL_PROGRAMS )
GETSPECIALFOLDER( CSIDL_COMMON_STARTMENU )
GETSPECIALFOLDER( CSIDL_PROFILE )
- Code: Select all Expand view
/* ***************************************** */
// Pres del foro de FiveTechSoft el 20/11/2010.
#define CSIDL_PROGRAMS 0x0002 // Start Menu\Programs
#define CSIDL_DESKTOPDIRECTORY 0x0010 // <user name>\Desktop
#define CSIDL_COMMON_STARTMENU 0x0016 // <All Users>\Start Menu
#define CSIDL_COMMON_DESKTOPDIRECTORY 0x0019 // <All Users>\Desktop
#define CSIDL_PROFILE 0x0028 // C:\Documents and Settings\<user name>
#define CSIDL_PROGRAM_FILES 0x0026 // C:\Program Files
#define CSIDL_FAVORITES 0x0006 // "C:\Documents and Settings\User\Favorites"
#define CSIDL_COMMON_FAVORITES 0x001F // "C:\Documents and Settings\All Users\Favorites"
#define CSIDL_MYDOCUMENTS 0x000C // Virtual "C:\Documents and Settings\username\My Documents"
#define CSIDL_PERSONAL 0x0005 // "C:\Documents and Settings\user\My Documents"
Como ves la
info está todo en este foro!!!!