Этот компонент отображает бегунок, что-то вроде регуляторов на аудио-оборудовании. Вроде этого:

Немного непохоже на стандартные бегунки Windows, не правда ли? Особенно эта синяя полоса... Дело в том, что класс TTrackBar, инкапсулировавший возможности стандартного бегунка, не имеет свойства типа EnableSelRange, которое разрешает или запрещает отображение этой самой полосы и одновременно контролирует ширину прорези. Это т.н. стиль элемента управления - TBS_ENABLESELRANGE.

Может быть в следующих Шагах будет рассмотрен вариант создания потомка TTrackBar с этим свойством. Пока рассмотрим свойства этого компонента

• Frequency
  Частота появления черточек между значения Min и Max. Например. Если минимальное значение 1, максимальное 9, а Frequency = 3, то засечки будут появляться на позициях 1, 3, 6, 9.

  LineSize, PageSize

  Определяют величину сдвига бегунка при помощи клавиатуры. В первом случае - клавишами курсора, во втором - клавишами PgUp и PgDn.

  Max, Min, Position

  Соотвественно минимальное значение, максимальное и текущая позиция бегунка. Устанавиливая свойство Position, можно продвинуть бегунок.

  Orientation

  Направление бегунка. В смысле - вертикально или горизонтально.

  SelEnd, SelStart

  Определяют начало и конец выделенной области. Если SelEndSliderVisible

  Виден ли движок этого компонента.

  ThumbLength

  Ширина полосы бегунка и собственно движка бегунка.

  TickMarks

  Где должны вырисовываться засечки. Внизу (если направлен горизонтально) или справа (вертикально) - tmBottomRight. Вверху или слева - tmTopLeft. С обеих сторон - tmBoth.

  TickStyle

  Как эти засечки должны вырисовываться. Если tsAuto - автоматически по свойствам. Если tsManual - то в начале и в конце, а дополнительные вручную методом SetTick. Если tsNone - значит, вообще нет.

И один-единственный display метод - SetTick. По int параметру устанавливает дополнительную засечку.

Я думаю, этому компоненту можно найти хорошее применение :).