电子盖章问题 现在用VC6+MFC做个电子盖章ocx,请问要怎么嵌入到OFFICE中,还有画板上的印章怎么显示在OFFICE文档中。谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 找一些 关于 office addin的资料来看 1.实现插入控件到WORD文档中:说明:控件在WORD文档中是以SHAPE对象出现,微软提供了接口。我写一段VB的代码,楼主可以修改成VC的。代码:'Sign.SignCtrl表示 "类库.类名"Set sealContainerInline = oDoc.Application.Selection.InlineShapes.AddOLEControl("Sign.SignCtrl")Set sealContainer = sealContainerInline.ConvertToShape With sealContainer .LockAnchor = False .WrapFormat.AllowOverlap = True .WrapFormat.Side = 0 .WrapFormat.Type = 3 If iStampPosType = 0 Then '最底层 .ZOrder 5 Else '最顶层 .ZOrder 4 End If End With2.实现画图:由于SHAPE本身就是公章控件了,所以直接在控件中画图会自动显示在SHAPE上面的。画图操作在ondraw函数中进行。 Objective Toolkit界面库哪里下载 如何将采集到每一帧视频文件与声卡的音频流合成AVI文件(非Directshow) 在线程函数中的函数指针问题 求教CAsyncSocket类如何关闭连接? 请问如何使用CListCtrl进行数据库编程? 请问有没有关于CAD的二次开发的资料? 谁有深入浅出MFC(第二版)简体中文版下载? 请教--使用CView类访问数据库产生问题 Visual Assist的问题 简单问题 CRichEdit问题????????????? 请高手帮忙看看这两句话的意思,谢谢! VS2008出现的诡异问题。。
说明:控件在WORD文档中是以SHAPE对象出现,微软提供了接口。我写一段VB的代码,楼主可以修改成VC的。
代码:
'Sign.SignCtrl表示 "类库.类名"
Set sealContainerInline = oDoc.Application.Selection.InlineShapes.AddOLEControl("Sign.SignCtrl")
Set sealContainer = sealContainerInline.ConvertToShape
With sealContainer
.LockAnchor = False
.WrapFormat.AllowOverlap = True
.WrapFormat.Side = 0
.WrapFormat.Type = 3
If iStampPosType = 0 Then '最底层
.ZOrder 5
Else '最顶层
.ZOrder 4
End If
End With
2.实现画图:
由于SHAPE本身就是公章控件了,所以直接在控件中画图会自动显示在SHAPE上面的。
画图操作在ondraw函数中进行。