设置悬浮对象横向定位绝对测量
builder.CreateFile("docx")!varoDocuments=api.GetDocumentvarolements=ODocument.GetEplement0oclipse.adText)oclipse.adText)oddtext(形状与文本间距半英吋(457200英文度量器))Var OGs1 = Api.CreateGradientStopVar OGS2 = Api.CreateGradient StopvaroFinll =api.CriateRadialGratientFillvarostroke=api.CreatestrokevaroDrawing=api.CreateShapeODrawing.SetDistances(457200,457200,457200,457200,0)oDrawing.SetWrappingStyle("square")!oDrawing.SetHorPosition("rightMargin", 0)!oParagraph.AddDrawing(oDrawing)!odeptes = Api.CreatelementsodText ("这是另一段.")oDocument.Push(oParagraph)!odeptes = Api.CreatelementsodText (“形状横向对齐右边缘”)oDocument.Push(oParagraph)!builder.SaveFile("docx", "SetHorPosition.docx")!builder.CloseFile();