Я пытаюсь создать составной компонент на базе TWinControl.
В нём TShape, TEdit и TLabel.
Размеры компонента совпадают с TShape.
Вопрос такой, а как заставить его перемещаться (таскать
мышкой)?
Обработчик событий Mouse(Down,Move,Up) есть, но на эти
события никакой реакции.

> Пётр_К   (30.03.07 16:28)  

> Обработчик событий Mouse(Down,Move,Up) есть, но на эти
> события никакой реакции.

Похоже, что причина в этом: "Размеры компонента совпадают с TShape".
То есть - ЧЬЕ событие-то получается?

> как заставить его перемещаться (таскать мышкой)?

Как обычно - обработчики событий мыши. Но, опять же - ЧЬИХ событий?

Для компонента, возможно, нужно будет не писать сами обработчики события, а заместить методы их диспетчеризации.

>  Но, опять же - ЧЬИХ событий?

На сколько я понял нужно таскать в Run-Time.
Естественно событий тех контролов, над которыми пляшет мышка.

> DimaBr   (02.04.07 09:20) [2]

И пляшет она, похоже, над TShape. А не над подложкой, которую надо таскать.