Перетаскивание формы

[A.A.Z.]

Как сделать так, чтобы можно было форму перетаскивать за любое место, я знаю.
В моём случае всю форму занимает элемент управления (Shockwave Flash), поэтому MouseMove для формы игнорируется. Как осуществить перетаскивание окна за любую часть при сложившихся обстоятельствах?
Note: свойств типа MouseDown, MouseUp и MouseMove у эл-та Shockwave Flash не имеется.

[Amed]

Предлагаю:

а) отслеживаешь в таймере нахождение курсора в форме (через GetCursorPos)
б) отслеживаешь нажатие клавиши мыши через GetAsyncKeyState
в) если во время тика таймера значение "нажатости" изменилось с "-" на "+", то произошло как бы Form_MouseDown, а если с "+" на "-", то Form_MouseUp.

Исходя из полученных данных и дописывай

Вроде бы всё объяснил, а?
P.S. сам бы пример написал, да времени нету

[A.A.Z.]

Спасибо!
А какой-нибудь ещё способ есть?

[GSerg]

Ну сабклассинг ещё

[A.A.Z.]

А что это?

[GSerg]

Каждое окно имеет процедуру обработки сообщений. Процедура, соответственно, имеет адрес. Заюзав функцию getwindowlong с параметром gwl_wndproc, мы узнаем адрес функции-обработчика нужного нам окна. Запомнив сию несомненно важную цифирь, мы вызываем setwindowlong с тем же gwl_wndproc, дабы подсунуть окну другой адрес функции, которая, конечно же, у нас в модуле. Теперь наша функция будет огребать все сообщения, которые шлются окну, делать оргвыводы и адекватно реагировать (в число адекватных реакций входит вызов callwindowproc со старым адресом в качестве параметра, а то как перестанет всё отрисовываться, к примеру...).
Ну ты понял смысл, я думаю
Для дальнейшего продвижения на сём славном поприще сходи на www.vbstreets.ru и из раздела с исходниками качни мой SubClasser.

[A.A.Z.]

Ну ты понял смысл, я думаю

Не-а! Большой и толстый 0!
Но всё равно спасибо, за помощь и за SubClasser!