Проект: список установленных программ

private: System::Void listView1_SelectedIndexChanged(System::Object^  sender, System::EventArgs^  e) {
            HKEY currentKey;
            TCHAR name[1024];
            DWORD dwSize = 1024, dwIdx = 0;
            long result;
            result = RegOpenKeyEx(HKEY_LOCAL_MACHINE, _T("Software\\Microsoft\\Windows\\CurrentVersion\\Uninstall"), 0, 
                        KEY_ENUMERATE_SUB_KEYS | KEY_QUERY_VALUE | KEY_SET_VALUE, &currentKey);
 
            if (result != ERROR_SUCCESS)
            {
 
            }
            else
            {
                DWORD index = 0;
                while (ERROR_SUCCESS == RegEnumKeyEx(currentKey, index, name, &dwSize, NULL, NULL, NULL, NULL)) {
                
                    dwSize = 1024; 
                    ++index; 
                }
            }
        }