获取系统已安装字体？

[alexander_david]

去年做的东西，需要获取系统当期已经安装的字体名称，通过查询注册表实现，程序运行正常。但是今天测试莫名其妙不行了。程序已经用管理员身份执行，注册表可以打开，但是RegEnumValue()返回失败，并且返回值每次都不一样：

LONG Ctest::GetNextNameValue(HKEY key, LPCTSTR subkey, LPTSTR szName, LPTSTR szData)
{
	HKEY hkey = NULL;
	DWORD dwIndex = 0;
	LONG retval;

	if (subkey == NULL && szName == NULL && szData == NULL)
	{
		if (hkey)
			RegCloseKey(hkey);
		hkey = NULL;
		return ERROR_SUCCESS;
	}

	if (subkey && subkey[0] != 0)
	{
		retval = RegOpenKeyEx(key, subkey, 0, KEY_ALL_ACCESS, &hkey);
		if (retval != ERROR_SUCCESS)
		{
			//TRACE(_T("RegOpenKeyEx failed\n"));
			MessageBox(NULL, _T("RegOpenKeyEx failed!"), NULL, 0);
			return retval;
		}
		else
		{
			MessageBox(NULL, _T("RegOpenKeyEx succeed!"), NULL, 0);
		}
		dwIndex = 0;
	}
	else
	{
		dwIndex++;
	}

	ASSERT(szName != NULL && szData != NULL);

	*szName = 0;
	*szData = 0;

	TCHAR szValueName[MAX_PATH];
	DWORD dwValueNameSize = sizeof(szValueName)-1;
	TCHAR  szValueData[MAX_PATH];
	DWORD dwValueDataSize = sizeof(szValueData)-1;
	DWORD dwType = 0;

	memset(szValueName, 0, sizeof(szValueName));
	memset(szValueData, 0, sizeof(szValueData));

	retval = RegEnumValue(hkey, dwIndex, szValueName, &dwValueNameSize, NULL, 
		&dwType, (LPBYTE)szValueData, &dwValueDataSize);
	if (retval == ERROR_SUCCESS) 
	{
		lstrcpy(szName, szValueName);
		lstrcpy(szData, szValueData);
	}
	else
	{
		CString str;
		str.Format(_T("RegEnumValue failed! return value = 0x%x", retval));
		MessageBox(NULL, str, NULL, 0);

	}
	return retval;
}

郁闷阿，请大侠出手。

[alexander_david]

上面函数来自网页： http://bbs.csdn.net/topics/300225641 系统是win7，vc2008

[oyljerry]

出错时，GetLastError获取的错误码是什么

[alexander_david]

引用 2 楼 oyljerry 的回复:

出错时，GetLastError获取的错误码是什么

是0. 谢谢回复。

[Eleven]

retval = RegEnumValue（。。。）； 这里的retval的返回值是什么？对应的MSDN看看

[zwfgdlc]

EnumFonts https://msdn.microsoft.com/en-us/library/dd162622

[alexander_david]

谢谢各位热心。 刚才看了一下RegEnumValue()，返回值表示是无效的句柄，估计是这个函数第一个参数有问题。 另外发现，上面的程序在大多数系统是正常工作的，估计是某些系统的注册表有问题，同时上面的代码逻辑不完善导致输入参数无效。 我先回去了。谢谢各位。

[worldy]

int CALLBACK EnumFontFamExProc(
							   ENUMLOGFONTEX *lpelfe,    // pointer to logical-font data
							   NEWTEXTMETRICEX *lpntme,  // pointer to physical-font data
							   int FontType,             // type of font
							   LPARAM lParam             // application-defined data
							   )
{

	CEdit* pEdit=(CEdit*)lParam;
	lpelfe->elfFullName;
	int L=pEdit->GetWindowTextLength();
	pEdit->SetSel(L,L);
	if(L>0)
	{
		pEdit->ReplaceSel(_T("\n"));
		L=pEdit->GetWindowTextLength();
		pEdit->SetSel(L,L);
	}
	pEdit->ReplaceSel(lpelfe->elfFullName);
	return 1;
}

void CEnumFontsTestDlg::OnBnClickedButton1()
{
	// TODO: 在此添加控件通知处理程序代码
	LOGFONT lf;
	lf.lfCharSet=DEFAULT_CHARSET;
	lf.lfFaceName[0]=0;
	lf.lfPitchAndFamily=0;

	CDC* pDC=GetDC();
	EnumFontFamiliesEx(pDC->m_hDC,&lf,(FONTENUMPROC)EnumFontFamExProc,(LPARAM)&TxEdit,0);//TxEdit：CEdit类对象
	ReleaseDC(pDC);
}

[alexander_david]

谢谢各位，有两个静态局部变量，我写成局部变量了。 static HKEY hkey = NULL; static DWORD dwIndex = 0; 谢谢。