VC word 插入图片操作。已经实现可以插入制定的图片,但是我想一行插一个,实现换行的功能,代码如下。
or(inti=12;i>0;i--){shapes=wordSelection.get_InlineShapes();CStringstr=CurrentProgram...
or(int i=12;i>0;i--)
{
shapes =wordSelection.get_InlineShapes();
CString str=CurrentProgramPath;
CString num;
num.Format("%d",1);
str+="\\"+num+".bmp";
shapes.AddPicture(str,COleVariant((short)FALSE),COleVariant((short)TRUE),&_variant_t(wordSelection.get_Range()));//添加图片,并制定其位置为当前光标位置
shapes.ReleaseDispatch(
);
//wordSelection.TypeParagraph();
}
但是得到的图形并不是我想要的。我想要竖着一排,他给我出现了横着一排!! 展开
{
shapes =wordSelection.get_InlineShapes();
CString str=CurrentProgramPath;
CString num;
num.Format("%d",1);
str+="\\"+num+".bmp";
shapes.AddPicture(str,COleVariant((short)FALSE),COleVariant((short)TRUE),&_variant_t(wordSelection.get_Range()));//添加图片,并制定其位置为当前光标位置
shapes.ReleaseDispatch(
);
//wordSelection.TypeParagraph();
}
但是得到的图形并不是我想要的。我想要竖着一排,他给我出现了横着一排!! 展开
2个回答
展开全部
同上用的不是wordSelection.TypeParagraph();分段方法,而是用的
wordSelection.MoveDown(COleVariant((short)5),COleVariant((short)1),COleVariant((short)0));
这个方法,就实现了竖排插入的效果了,但是如果想要图片之间没有缝隙,还需要设置行间距最小为0 ,否则会出现间隔的。本人也查了查MoveDown此方法,以供后来人参考。
该方法用于将所选内容向下移动,并返回移动距离的单位数。
Function MoveDown([Unit As WpsUnits = wpsLine],
[Count As Long = 1],
[Extend As WpsMovementType = wpsMove]) As Long
参数说明Unit
WpsUnits 类型,可选。所选内容移动距离的度量单位。
Unit 可以是下列 WpsUnits 常量之一:
值描述wpsLine行(默认)wpsParagraph段落wpsWindow窗口wpsScreen屏幕
Count
Variant 类型,可选。所选内容移动距离的单位数。默认值为 1。
Extend
Variant 类型,可选。可为 wpsMove 或 wpsExtend。如果是 wpsMove,则所选内容折叠到结束位置,并向下移动。
wordSelection.MoveDown(COleVariant((short)5),COleVariant((short)1),COleVariant((short)0));
这个方法,就实现了竖排插入的效果了,但是如果想要图片之间没有缝隙,还需要设置行间距最小为0 ,否则会出现间隔的。本人也查了查MoveDown此方法,以供后来人参考。
该方法用于将所选内容向下移动,并返回移动距离的单位数。
Function MoveDown([Unit As WpsUnits = wpsLine],
[Count As Long = 1],
[Extend As WpsMovementType = wpsMove]) As Long
参数说明Unit
WpsUnits 类型,可选。所选内容移动距离的度量单位。
Unit 可以是下列 WpsUnits 常量之一:
值描述wpsLine行(默认)wpsParagraph段落wpsWindow窗口wpsScreen屏幕
Count
Variant 类型,可选。所选内容移动距离的单位数。默认值为 1。
Extend
Variant 类型,可选。可为 wpsMove 或 wpsExtend。如果是 wpsMove,则所选内容折叠到结束位置,并向下移动。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询