怎么在视图中调用字体对话框修改字体？

下面的函数中应如何调用字体对话框修改字体呢？ 给出些简单代码吧 谢谢

void CTxtView::OnDraw(CDC* pDC)
{

//m_fore_color=RGB(255,255,255);
pDC->SetBkColor(m_bkcolor);
CBrush brush;
CPen pen;

//CFont cf;
//cf.CreateFontIndirect(&m_lf);
//CFont* oldFont = pDC->SelectObject(&cf);
pen.CreatePen(PS_SOLID,3,m_fore_color);
brush.CreateSolidBrush(m_bkcolor);
CBrush* oldbrush=pDC->SelectObject(&brush);
CPen* oldpen=pDC->SelectObject(&pen);
CRect rc(0,0,300,300);
pDC->Rectangle( rc );

pDC->Rectangle( rc );
pDC->TextOut(0,10,_T("春晓")); // 使用自定义的停止位(Tab)
pDC->TextOut(0,40,_T("春眠不觉晓"));
pDC->TextOut(0,80,_T("处处闻啼鸟"));
pDC->TextOut(0,120,_T("夜来风雨声"));
pDC->TextOut(0,160,_T("花落知多少"));
// 使用默认的停止位
pDC->SelectObject(oldbrush);
pDC->SelectObject(oldpen);

}

怎么在VB中调用‘搜索对话框’ vc 如何在对话框中嵌入视图 VB中如何调用系统字体对话框呢？ VC中,在模态对话框中创建视图运行正确,但在非模态对话框中创建视图出错!!急!! ASP程序中，调用函数的字体怎样修改？ 怎样修改MSN聊天对话框中字体的默认大小？ 在mfc单文档中怎么调用已设定的对话框? SQL中视图的修改 VC中,如何通过调用字体通用对话框来改变一个控件的文本的颜色 网页中调用QQ天气怎么设置字体颜色