Count: Integer;
Свойство Count определяет количество шкал спидометра.
По умолчанию спидометр содержит одну шкалу. Для изменения количества шкал, отображаемых в спидометре необходимо изменить данное свойство.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1» и компонента SpeedometerBox с наименованием «SpeedometerBox1».
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
s: ISpeedometer;
v: ISpeedometerView;
ScaleView, ScaleView1: ISpeedometerScaleView;
Begin
s := SpeedometerBox1.Speedometer;
v := s.View;
s.BeginUpdate;
s.Scales.Count := 2;
v.ScaleViews.Count := 2;
ScaleView := v.ScaleViews.Item(0);
ScaleView1 := v.ScaleViews.Item(1);
//Первое оформление
ScaleView.StartAngle := 0;
ScaleView.DeltaAngle := 180;
//Второе оформление
ScaleView1.FontColor := GxColor.FromName("Green");
ScaleView1.TextPlacement := SpeedometerTextPlacementType.OutsideRotated;
s.EndUpdate;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку в компоненте «SpeedometerBox1» будут отображаться два спидометра. Для каждого спидометра будет настроено свое оформление.
См. также: