Creación de jumplist en Windows 7

[_cero_]

Como han estado por aquí? Espero que bien. Bueno pues ese es mi problema, estoy intentando crear mis propias jumplist con funciones específicas como las de WMP12 y aunque ya logre armar un grupo de funciones que me hace esto y todas compilan y trabajan sin errores, ps simplemente no me crean las jumplist, así que quisiera que me indicaran en donde esta mi error o como hacer una.

Estoy trabajando con c++ builder 2010, y obviamente Windows 7, de antemano gracias.

Les dejo esta función, es como un resumen de las otras que debería funcionar sin embargo no lo hace.

void __fastcall TForm1::CrearJumpList()
{
/**/
    ICustomDestinationList *pcdl;
    HRESULT hr;

    hr = CoCreateInstance(CLSID_DestinationList, NULL, CLSCTX_INPROC_SERVER, IID_PPV_ARGS(&pcdl));

    if (!SUCCEEDED(hr)) {ShowMessage("Error"); return;}

    hr=pcdl->SetAppID(L"emp.apli.subapli.verci");

    if (!SUCCEEDED(hr)) {ShowMessage("Error"); return;}

    UINT cMinSlots;
    IObjectArray *poaRemoved;

    hr = pcdl->BeginList(&cMinSlots, IID_PPV_ARGS(&poaRemoved));

    if (!SUCCEEDED(hr)) {ShowMessage("Error"); return;}
//
    IObjectCollection *poc;

    hr=CoCreateInstance(CLSID_EnumerableObjectCollection, NULL, CLSCTX_INPROC, IID_PPV_ARGS(&poc));

    if (!SUCCEEDED(hr)) {ShowMessage("Error"); return;}

    IShellItem *psi;
    String lolo="c:\\lolo.txt";

    hr=SHCreateItemFromParsingName (lolo.c_str(), NULL, IID_PPV_ARGS(&psi));
    //hr=SHCreateItemInKnownFolder(FOLDERID_Desktop, KF_FLAG_DEFAULT, L"Microsoft_Sample_1.txt", IID_PPV_ARGS(&psi));

    if (!SUCCEEDED(hr)) {ShowMessage("Error"); return;}

    poc->AddObject(psi);
    psi->Release();

    IObjectArray *poa;

    hr = poc->QueryInterface(IID_PPV_ARGS(&poa));

    if (!SUCCEEDED(hr)) {ShowMessage("Error"); return;}

    hr = pcdl->AppendCategory(L"categoria 1", poa);
    hr=pcdl->AddUserTasks(poa);

    poa->Release();
    poc->Release();
    pcdl->CommitList();
    poaRemoved->Release();
    pcdl->Release();

    if (!SUCCEEDED(hr)) {ShowMessage("Error frecuente"); return;}

    ShowMessage("ya esta");
}

[Ñuño Martínez]

Hola. Veo que nadie contesta. Yo no tengo ni idea, pero tengo curiosidad:

¿Qué es "jumplist"?

[_cero_]

Jump list, son las listas que salen al darle click derecho en un botón de la nueva barra de tareas de win 7, pueden ser realmente útiles para una que otra función rápida, dejo una imagen para aclarar el asunto.