у-у-у Как все запущено
На самом деле это нетривиальная задача. Когда мне это потребовалось — единственное приемлемое решение, которое я нашел:
— пишем TConrtol — c функциональностью ScroolBar
— размещаем его НАД стандарьным скролом
— ловим мышиные эвенты и передаем окну
— ловим эвенты от окна и при скролировании и т.д. читаем свойства скрул бара (позицию, размер ползунка и т.д) и рисуем свой скрул по этим параметрам.

Детально я не скажу как это делать, но при необходимости большой на следюущей неделе могу кинуть пример (исходники на компе у брата дома).