MinorTickInfo: ISpeedometerTickInfo;
Свойство MinorTickInfo возвращает параметры дополнительных делений шкалы.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1» и компонента SpeedometerBox с наименованием «SpeedometerBox1».
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
s: ISpeedometer;
v: ISpeedometerView;
ScaleView: ISpeedometerScaleView;
Tick: ISpeedometerTickInfo;
Begin
s := SpeedometerBox1.Speedometer;
v := s.View;
s.BeginUpdate;
ScaleView := v.ScaleViews.Item(0);
Tick := ScaleView.MinorTickInfo;
Tick.Color := GxColor.FromName("Green");
Tick.Height := 2;
Tick.Proportion := 0.7;
Tick.Shape := SpeedometerTickShapes.Rombus;
s.EndUpdate;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку будет изменено оформление дополнительных делений шкалы спидометра, отображаемого в компоненте «SpeedometerBox1».
См. также: