NameRange: ITabRange;
The NameRange property determines parameters of the cell or the cell range that contains the series name.
Executing the example requires a regular report with the REGULAR_REPORT identifier, the report sheet contains a 3D scene with specific source data and data in the range B1:E3. A unit is added to the report that is used to call the GetNameRange procedure using the hyperlink. Add links to the Report, Tab, Metabase, Drawing system assemblies.
Sub GetNameRange;
Var
Report: IPrxReport;
Tab: ITabSheet;
s: IPrxScene3D;
ser: IPrxScene3DNamedPointSerie;
Begin
Report := PrxReport.ActiveReport;
Tab := (Report.ActiveSheet As IPrxTable).TabSheet;
s := Tab.Objects.Item(0).Extension As IPrxScene3D;
ser := s.Series.Item(s.Series.Count - 1) As IPrxScene3DNamedPointSerie;
ser.NameRange.Style.BackgroundColor := New GxColor.CreateRGB(0, 255, 0);
ser.PointsRange.Style.BackgroundColor := New GxColor.CreateRGB(0, 0, 255);
End Sub GetNameRange;
After executing the example clicking the hyperlink applies the specified fill for the cells with series names and points names.
Executing the example requires a regular report with the REGULAR_REPORT identifier, the report sheet contains a 3D scene with specific source data and data in the range B1:E3. Add links to the Report, Tab, Metabase, Drawing system assemblies.
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;
Imports Prognoz.Platform.Interop.Drawing;
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Report: IPrxReport;
s: IPrxScene3D;
Tab: ITabSheet;
ser: IPrxScene3DNamedPointSerie;
Color: GxColorClass = New GxColorClassClass();
Begin
MB := Params.Metabase;
Report := MB.ItemById["REGULAR_REPORT"].Edit() As IPrxReport;
Tab := (Report.Sheets.Item[0] As IPRxTable).TabSheet;
s := Tab.Objects.Item[0].Extension As IPrxScene3D;
ser := s.Series.Item[s.Series.Count - 1] As IPrxScene3DNamedPointSerie;
ser.NameRange.Style.BackgroundColor := Color.FromKnownColor(GxKnownColor.clLightGreen);
ser.PointsRange.Style.BackgroundColor := Color.FromKnownColor(GxKnownColor.clBlue);
(Report As IMetabaseObject).Save();
End Sub;
After executing the example the regular report uses the specified fill for the cells with series names and points names.
See also: