Здравствуйте, Dazz, Вы писали:

D> Как написать класс на основе TCustomControl типа TButton, но с
D> несколькими возможными состояниями (т.е рисует на себе обну картинку,
D> если мыша на нем, и другую, если мыша с него съехала) и не квадратный.

Для мышки обрабатывай события CM_MOUSEENTER и CM_MOUSELEAVE.

Чтобы сделать компонент непрямоугольным, есть два пути:

1. Рисуешь непрямоугольную кнопку на прямоугольном компоненте
2. Используешь функцию WinAPI SetWindowRgn, предварително создав регион
нужной формы.

А вообще, лучше воспользуйся готовым компонентом, сходив на сайт
http://www.torry.net/

---------------------------------------------------------
СНП, Artyomov Denis. E-mail: artyomov <at> inbox.ru