如何设置字体或字体大小?
static HDC hDC;
hDC=GetDC(0) ;
SetBkMode (hDC,0);
SelectObject(hDC,GetStockObject(SYSTEM_FONT)) ;
SetTextColor(hDC,RGB(255,0,0)) ;
TextOut(hDC,10,100,"231231231231231231",18 ) ;
ReleaseDC(0,hDC) ;
但该如何设置字体和字体大小呢?
问题点数:100、回复次数:1Top
1 楼ccrun(老妖)(www.ccrun.com)回复于 2003-12-02 16:12:02 得分 100
用LOGFONT
void __fastcall TForm1::Button1Click(TObject *Sender)
{
LOGFONT fontRec;
memset(&fontRec, 0, sizeof(LOGFONT));
fontRec.lfHeight = 20; //字体的高度
fontRec.lfWeight = FW_BOLD; //粗体
lstrcpy(fontRec.lfFaceName, "Verdana"); //字体
HFONT hFont = CreateFontIndirect(&fontRec);
String strTemp = "输出文字";
::SelectObject(Canvas->Handle, hFont);
::SetTextColor(Canvas->Handle, clRed);
::SetBkMode(Canvas->Handle, TRANSPARENT);
::TextOut(Canvas->Handle, 10, 10, strTemp.c_str(), strTemp.Length());
::DeleteObject(hFont);
}Top




