我做了一个activeX控件，继承了库存font属性，现在在使用的时候想把当前字体改为隶书黑体，该怎么办？

[yushulei]

我做了一个activeX控件，继承了库存font属性，现在在使用的时候想把当前字体改为隶书黑体，该怎么办？
想调用SetFont函数，但不知道怎么传参数，看了msdn还是不太明白，可能是英文不太好吧！还有字体大小等等都不知道怎么传进去。
如果建一个CFont对象也不行，用setfont也不行。郁闷！请高手赐教！谢谢。

[wudhu]

gz

[yushulei]

up

[ayqlj]

LPFONT m_pFont;
FONTDESC fd =
{sizeof(FONTDESC), OLESTR("隶书"), FONTSIZE( 10 ),
FW_NORMAL, ANSI_CHARSET, FALSE, FALSE, FALSE };
::OleCreateFontIndirect(&fd, IID_IFont, (void**)&m_pFont);

这样行吧？

[yushulei]

恕在下笨拙啊！我看不懂，这该用在什么地方呢？
SetClientSite和GetAmbientFontDisp也不知道什么用处。
我现在最重要的问题是不知道怎么使用SetFont,也就是不知道怎么给他
传参数，以改变字体的属性。请继续，谢谢。

[yushulei]

还是不能用setfont啊？

[LeeZi]

在控件的SetClientSite不要调用GetAmbientFontDisp。
换成：

FONTDESC DefaultFont;
ZeroMemory(&DefaultFont, sizeof(DefaultFont));
DefaultFont.cbSizeofstruct = sizeof(DefaultFont);
DefaultFont.lpstrName = L"隶书";
DefaultFont.cySize.Hi = 0;
DefaultFont.cySize.Lo = 10 * 10000;
OleCreateFontIndirect(&DefaultFont, IID_IFontDisp, reinterpret_cast<void**>(&m_pFont));

[ayqlj]

setfont什么意思，是自己写的函数吗？
还是一个接口？

[warmchang]

LeeZi(临渊羡鱼，不如退而结网) ( ) 的方法是对的！

[ayqlj]

ATL并没有完全实现内置字体属性，它提供了内部成员变量指向IFontDisp接口，可是你仍然需要进行OLE字体的初始化，以下代码是演示：

在你的控件类的构造函数中加入以下代码：

CMyCtl()
{
static FONTDESC _fontDesc =
{ sizeof(FONTDESC), OLESTR("MS Sans Serif"),
FONTSIZE( 12 ), FW_BOLD,
ANSI_CHARSET, FALSE, FALSE, FALSE };

OleCreateFontIndirect( &_fontDesc,IID_IFontDisp,(void **)&m_pFont );
}
在你需要使用的地方使用以下代码，一般是在控件的OnDraw方法中，如下：

//取得字体
CComQIPtr<IFont, &IID_IFont> pFont( m_pFont );
if ( pFont )
{
HFONT hOldFont = 0;
HFONT hFont;
pFont->get_hFont( &hFont );
hOldFont = (HFONT) SelectObject( hdc, hFont );

// 使用它...

if ( hOldFont )
SelectObject( hdc, hOldFont );
}
一般在VC6的ATL向导中选择了Font字体属性的话，向导会在IDL文件中自动产生以下代码，没有的话手工加入以下声明(加粗部分)：

#include <olectl.h>

import "oaidl.idl";

[
uuid(E63A22F1-9BD3-11D0-A6D7-0000837E3100),
version(1.0),
helpstring("NoteIt 1.0 Type Library")
]
library NOTEITLib
{
importlib("stdole32.tlb");
importlib("stdole2.tlb");

// Interface is now inside the library block
[
object,
uuid(E63A2306-9BD3-11D0-A6D7-0000837E3100),
dual,
helpstring("INoteCtl Interface"),
pointer_default(unique)
]
interface INoteCtl : IDispatch
{
...
[propputref, id(DISPID_FONT)]
HRESULT Font([in]IFontDisp* pFont);
[propput, id(DISPID_FONT)]
HRESULT Font([in]IFontDisp* pFont);
[propget, id(DISPID_FONT)]
HRESULT Font([out, retval]IFontDisp** ppFont);
...
};
...
}

[yushulei]

setfont是继承控件的库存font属性后自带的。

[yushulei]

to ayqlj()
谢谢你的帮助，你给我发的欣我才看到，因为公司里上国外网站很慢，经常打不开·
我慢慢研究研究，因为最近忙了起来，可能耽搁一端时间，以后要是不懂还请继续指教，
谢谢。