StartColor: IGxColor;
Свойство StartColor определяет начальный цвет цветовой шкалы.
Для использования данного свойства необходимо, чтобы свойство IGxColorScale.UseAutoValues принимало значение True.
Для задания конечного цвета цветовой шкалы, используйте свойство IGxColorScale.EndColor.
Для выполнения примера в репозитории необходимо наличие экспресс-отчета с идентификатором «EXPRESS_SCALE». Отчет содержит таблицу, построенную на основе куба. Куб содержит нескрытое фиксированное измерение, у которого настроено отображение метрик.
Добавьте ссылки на системные сборки: Dimensions, Drawing, Express, Metabase.
Sub UserProc;
Var
MB: IMetaBase;
Express: IEaxAnalyzer;
Style: IEaxTableStyle;
DimSel: IDimSelection;
ColorScale: IGxColorScale;
Begin
// Получим репозиторий
MB := MetabaseClass.Active;
// Получим регламентный отчет
Express := MB.ItemById("EXPRESS_SCALE").Edit As IEaxAnalyzer;
// Получим параметры оформления таблицы
Style := Express.Grid.Style;
// Получим отметку у фиксированного измерения
DimSel := Express.Grid.IndicatorSelection(EaxGridIndicatorType.BackgroundColor);
// Выберем второй элемент
DimSel.SelectElement(1, False);
// Установим шкалу для заливки ячеек
ColorScale := Style.IndicatorScale(EaxGridIndicatorType.BackgroundColor) As IGxColorScale;
// Включим автоматические значения
ColorScale.UseAutoValues := True;
// Установим начальный цвет
ColorScale.StartColor := GxColor.FromName("Green");
// Установим конечный цвет
ColorScale.EndColor := GxColor.FromName("Yellow");
// Получим отметку и сменим элемент, чтобы обновить таблицу
DimSel := Express.Grid.IndicatorSelection(EaxGridIndicatorType.BackgroundColor);
Dimsel.SelectElement(0, False);
// Сохраним изменения
(Express As IMetabaseObject).Save;
End Sub UserProc;
После выполнения примера изменится цвет заливки ячеек от левого верхнего угла до правого нижнего угла области значений.
См. также: