Color(Index: Integer; Impact: MapScaleSettingImpact): IGxColor;
Index - индекс деления шкалы.
Impact - определяет положение относительно значения деления шкалы.
Свойство Color определяет цвет заливки относительно заданного значения деления шкалы. Каждому значению деления шкалы (IMapScale.Value) соответствует три цветовых деления (меньше, равно, больше). Показатели будут закрашены следующим образом. Если значение показателя больше (меньше) значения деления, то заливка примет цвет, заданный с параметром MapScaleSettingImpact.Less (MapScaleSettingImpact.Greater). Если значение показателя совпадает со значением деления шкалы, то заливка примет цвет, заданный с параметром MapScaleSettingImpact.Exact.
В рассматриваемом примере предполагается существование объекта Report типа IPrxReport.
Sub UserProc;
Var
Report: IPrxReport;
MapScale : IMapColorScale;
i : Integer;
Begin
MapScale := Report.Scales.Add(PrxMapScale.Color).MapScale As IMapColorScale;
MapScale.Count := 7;
For i := 0 To MapScale.Count - 1 Do
MapScale.Value(i) := (i + 1) * 3000;
MapScale.Color(i, MapScaleSettingImpact.Less) := New GxColor.CreateRGB(120, 100 + (i*15), 225);
MapScale.Color(i, MapScaleSettingImpact.Exact) := New GxColor.CreateRGB(170, 100 + (i*15), 225);
MapScale.Color(i, MapScaleSettingImpact.Greater) := New GxColor.CreateRGB(220, 100 + (i*15), 225);
End For;
End Sub UserProc;
Для регламентного отчета будет создана цветовая шкала.
См. также: