[Delphi] Класс, реализующий простую шкалу

Среда разработки: Delphi 7.

Необходимо разработать класс, который реализует шкалу со значениями (см. рисунок).

Шкала должна возвращаться в виде объекта типа TBitmap или подобного. Предполагается выводить на форму посредством TImage.

Необходимые свойства:

- Width (Высота, в которую уместить шкалу);

- Heigth (Ширина шкалы);

- MinValue (Минимальное значение шкалы);

- MaxValue (Максимальное значение шкалы);

- Шаг шкалы: 5

- LeftValue - Левое значение (выделяет левое значение шкалы, например заливает кружок значения)

- RightValue - Правое значение (выделяет правое значение шкалы)

- Значения для текствовых полей (см. рисунок)

- CircleValue (boolean, True - заливает круг, False - только контур круга)

Обязательно краткое описание по использованию класса.

От Вас стоимость и сроки.