GetTextPr

GetTextPr()apiTextPr}

返回当前运行文本属性

参数:

这种方法没有任何参数

返回时间 :

类型
apiTextPr

实例

拷贝代码
builder.CreateFile("pptx")!varoPresentation=api.GetpresentationvaroSlide=oPresentation.getSlideByIndex0oSlide.RemoveAllObjects()!varoFinll =api.CreateSolidFillvarostroke=api.CreatestrokeVar Oshape = Api.CreateShapeoShape.SetPosition(608400, 1267200)!varoccontent=oshape.getdoccontentvarodente=occontent.getEplement0var ORun=api.CreateRunvaroTextPrssun.getTextProTextPr.SetFontSize(30)!oParagraph.SetJc("left")!ORun.AddText ("这是形状内样本文本 字体大小定为15分使用文本属性")oParagraph.AddElement(oRun)!oSlide.AddObject(oShape)!builder.SaveFile("pptx", "GetTextPr.pptx")!builder.CloseFile();

结果文档