ISpeedometerFilledBar.EndRadius

Синтаксис

EndRadius: Double;

Описание

Свойство EndRadius определяет конечный ограничивающий радиус полосы.

Комментарии

Это относительная величина (отношение текущего радиуса к расстоянию от внутренней границы шкалы до центра сектора, описывающего шкалу). Значение радиуса задается в интервале [0,1].

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1» и компонента SpeedometerBox с наименованием «SpeedometerBox1».

Sub Button1OnClick(Sender:Object; Args: IMouseEventArgs);
Var
    s: ISpeedometer;
    v: ISpeedometerView;
    ScaleView: ISpeedometerScaleView;
    FilledBar: ISpeedometerFilledBar;
    Bar, Bar1: ISpeedometerBar;
Begin
    s := SpeedometerBox1.Speedometer;
    v := s.View;
    s.BeginUpdate;
    ScaleView := s.View.ScaleViews.Item(0);
    FilledBar := ScaleView.FilledBar;
    FilledBar.StartRadius:= 0.1;
    FilledBar.EndRadius :=0.9;
    FilledBar.Bars.Count:= 2;
    Bar := FilledBar.Bars.Item(0);
    Bar1 := FilledBar.Bars.Item(1);
    Bar.StartColor := GxColor.FromName("Blue");
    Bar.EndColor := GxColor.FromName("Green");
    Bar.Part := 0.7;
    Bar1.StartColor := GxColor.FromName("Green");
    Bar1.EndColor := GxColor.FromName("Red");
    Bar1.Part := 0.3;
    s.EndUpdate;
End Sub Button1OnClick;

После выполнения примера при нажатии на кнопку будет изменено оформление цветной интервальной полосы спидометра, отображаемого в компоненте «SpeedometerBox1». Интервальная полоса будет разбита на два сегмента. Для каждого сегмента будут определены начальный и конечный цвет градиента. Первый сегмент будет занимать 70%, второй - 30% от интервальной полосы. Начальный и конечный радиус полосы будут установлены 0,1 и 0,9 соответственно.

См. также:

ISpeedometerFilledBar