v CPaintDC dc(this); // device context for painting
v CFont font;
v VERIFY(font.CreatePointFont(720,
"Comic sans MS", &dc));
v CRect rect;
v GetClientRect(rect);
v
v // Do
something with the font just created...
v
CFont*
def_font = dc.SelectObject(&font);
v dc.SetTextAlign(TA_BASELINE |
TA_CENTER);
v dc.TextOut(rect.right/2,rect.bottom/2,
"Hello World");
v dc.SelectObject(def_font);
v
v // Done with
the font. Delete the font object.
v
font.DeleteObject();
v