Предлагаю слегка подправленную версию своего компонента.
Теперь он компилируется и под FPC и под Delphi 4.
Качаем сдесь: http://slil.ru/26340353