Object: PolarAdditionalLabel
- Updated2024-09-12
- 1 minute(s) read
(Collections | PolarSystem) > PolarCurves > PolarCurve > PolarLineAndPoints > PolarLineAndPointsExtensions > Object: PolarAdditionalLabel
Object: PolarAdditionalLabel
The PolarAdditionalLabel object provides the properties of the labels of a polar curve in the display type Line and Points in DIAdem REPORT.
The following example generates a polar axis system with a curve and displays curve labels:
| VBScript | Python |
Dim oMyPolarAxisSystem, oMyCurve, oMyPos, oMyLabel Call Report.NewLayout() Call Data.Root.Clear() Call DataFileLoad(DataReadPath & "Report_Data.tdm","TDM","") Set oMyPolarAxisSystem = Report.ActiveSheet.Objects.Add(eReportObjectPolarSystem, "MyPolarAxisSystem") Set oMyPos = oMyPolarAxisSystem.Position.ByCoordinate oMyPos.X1 = 20 oMyPos.X2 = 80 oMyPos.Y1 = 20 oMyPos.Y2 = 80 Set oMyCurve = oMyPolarAxisSystem.CurvesPolar.Add(ePolarShapeLineAndPoints, "MyCurve") oMyCurve.Shape.XChannel.Reference = "[5]/[1]" oMyCurve.Shape.YChannel.Reference = "[5]/[2]" Set oMyLabel = oMyCurve.Shape.Extensions.Label oMyLabel.YValueVisible = True oMyLabel.YValueFormat = "d.dd" oMyLabel.Font.Name = "Arial" oMyLabel.RelativePosition = eRelativePositionPointCenter oMyLabel.Repetition.Mode = eLabelRepetitionMaxNPoints oMyLabel.Repetition.NValue = 10 oMyLabel.Angle = 45 Call Report.Refresh()
Properties
Angle | Font | FromChannel | IndexValueFormat | IndexValueVisible | RelativePosition | Repetition | Separator | Text | TextVisible | XValueFormat | XValueVisible | YValueFormat | YValueVisible