查看所有已安装的字体

int index;
BOOL CALLBACK EnumFonts(CONST LOGFONT* lplf, CONST TEXTMETRIC *lptm,DWORD dwType,LPARAM aFontName)
{
 CString far *aiFontName=(CString far*)aFontName;
 index++;
 aiFontName[index]=lplf->lfFaceName;
 return true;
}

void CFGDlg::OnOK()
{
 m_list.ResetContent();

 index=-1;
 CString aFontName[MAX_PATH];
 CPaintDC dc(this);
 ::EnumFonts(dc.m_hDC,NULL,(FONTENUMPROC)EnumFonts,(LPARAM)aFontName);
 for(int i=0; i<index; i++)
  m_list.AddString(aFontName[i]);
}