返回报表所有注释添加到文档中
这种方法没有任何参数
builder.CreateFile("docx")!varoDocuments=api.GetDocumentvarodeptice1=ODocument.GetEplement0oParagraph1.AddText("Commenting")!oParagraph1.SetJc("center")!oParagraph1.SetFontSize(24)!oParagraph1.SetBold(true)!varodis2=api.Createleoment2.AddText ("注释选项允许您保留对具体词的注释,编辑并删除这些注释.")oDocument.Push(oParagraph2)!varodis3=api.Createleodisc3.AddTextoDocument.Push(oParagraph3)!Api.AddComment(oLisces2, “你也可以对短语、句子和其他文档部件保留评论”,“John Smith”)varodepet4=api.Createleodis4.adText(“为允许注释选项,注释参数必须定为真数。”oDocument.Push(oParagraph4)!varodis5=api.Createleodision5.AddText (文档侧栏将包含注释菜单选项)oDocument.Push(oParagraph5)!Api.AddComment(odistic4),“您可以在文档初始化权限段设置注释选项”、“markpototovar o批注sReports=odocument.Get批注sReportsvarodeptes=api.CreateleoParagraph.AddLineBreak()!oParagraph.AddLineBreak()!oParagraph.AddText("Comments report")!oDocument.Push(oParagraph)!VarnRows=1suser报告){nRows_o批注sReportssssuserVarnColsssssssvaro表=api.Criate表oDocument.Push(oTable)!函数FellCell/nCurRow/nCurcol/stext/varORow=otable.getRow/nCurRowVaroCell/ORow/GetCell/nCurcolvaroCellContentsvarORun=oCellContent.GetEplement(0)AddText返回{Cell:OCell,Run:ORUN}私人FellCell(0,0,名)私有FillCell(0,1,Date)私有FillCell/0,2,2私有FillCell(0,3,Solved)私有FillCell(0,4,Text)私有FillCell(0,5,引文)VarnRow=1{vararuser批注sssReports_suserarcellsssssletndex=0,nCount=arruserComments.index/nCount++ndex,++nCurRowarrCells.push(privateFillCell(nCurRow, 0, "").Cell)!privateFillCell(nCurRow, 1, (new Date(oCommentInfo["Date"])).toString())!私有FellCell(nCurRow)2,OeInfo回答:评语)secolor(0,255,0)un.SetColor(25500)私有FillCell(nCurRow,4,OVERInfoCommentInfo私有FillCell(nCurRow5,OJPEFOeinfowaroergedCells/oTable.MergeCells/{voroCellCelltent=oMergedCell.GetContentoCellContent.GetElement(0).AddText(sUserName)!{cellContents=arrCells[0].getContentoCellContent.GetElement(0).AddText(sUserName)!} } oTable.SetStyle(oDocument.GetStyle("Bordered"))!builder.SaveFile("docx", "GetCommentsReport.docx")!builder.CloseFile();