VC 获取已系统安装的字体

转载请注明来源：https://www.cnblogs.com/hookjc/

BOOL CALLBACK EnumFonts(CONST LOGFONT* lplf, CONST TEXTMETRIC *lptm,DWORD dwType,LPARAM lparam)
{
CString tempFontName(lplf->lfFaceName);
CString temp=gSysFontNames;
if(tempFontName.Find("@")!=-1)
return true;
//可对tempFontName自行附加过滤条件

//{
gSysFontNames.Format("%s,%s",temp,tempFontName);
//}
return true;
}

void CDialogTest:OnButton1()

{

AfxMessageBox(GetSystemFontName((LPVOID)this);

}

CString CDialogTest::GetSysFontName(LPVOID lp)
{
gSysFontNames="";
try
{
  CPaintDC dc((CWnd*)lp);
  ::EnumFonts(dc.m_hDC,NULL,(FONTENUMPROC)EnumFonts,0);
  return gSysFontNames.Mid(1);
}
catch(...)
{
  return "";
}
}

巴特西

VC 获取已系统安装的字体

转载请注明来源：https://www.cnblogs.com/hookjc/

来源：python脚本自动迁移

最新文章

热门文章