如何设置对话框字体为当前系统窗口使用的字体

怎么设置对话框字体为当前系统窗口使用的字体？
VC6默认创建的对话框字体太难看了，不想通过对话框属性来设置字体，请问怎么才能得到系统当前使用的字体然后设置为对话框字体？


------解决方案--------------------
GetTextMetrics
EnumFontFamiliesEx
看看.这两个应该可以.
------解决方案--------------------
定义全局CFont m_font;

// m_font.DeleteObject();
m_font.CreateFont( 15,0,0,0,FW_NORMAL,FALSE,FALSE,FALSE,GB2312_CHARSET,OUT_DEFAULT_PRECIS,CLIP_DEFAULT_PRECIS,DEFAULT_QUALITY,FF_SWISS, "黑体 ");
this-> SetFont(&m_font);
CWnd *pw = GetWindow(GW_CHILD);
while(pw != NULL)
{
pw-> SetFont(&m_font);
pw = pw-> GetWindow(GW_HWNDNEXT);
}

对话框退出后 m_font.DeleteObject();
------解决方案--------------------
HGDIOBJ hFont = GetStockObject(SYSTEM_FONT);
CFont font;
font.Attach(hFont);
SetFont(&font);
------解决方案--------------------

void SetFont(
CFont* pFont,
BOOL bRedraw = TRUE
);
注意SetFont有两个函数，把第二个设为TRUE吧。
生成一个CFont，再使用SetFont来设字体。