Код:
Public Sub StickWindow(ParentWindow As Long, ChildWindow As Long, Optional ByVal NoActivate As Boolean = True, Optional ByVal NoShow As Boolean = False)
Dim Style As Long
Style = GetWindowLong(ChildWindow, GWL_STYLE)
Style = Style Or WS_CHILD
SetWindowLong ChildWindow, GWL_STYLE, Style
SetParent ChildWindow, ParentWindow
SetWindowLong ChildWindow, GWL_HWNDPARENT, ParentWindow
Style = SWP_NOZORDER Or SWP_NOSIZE Or SWP_NOMOVE
If NoActivate Then Style = Style Or SWP_NOACTIVATE
If Not NoShow Then Style = Style Or SWP_SHOWWINDOW
SetWindowPos ChildWindow, _
HWND_TOP, 0&, 0&, 100, 100, _
Style
End Sub
Вот это код на VB. Что он делает: делает чужое окно дочерним к нужному, т.е. "цепляет" его и делает частью.
Объявления функции тоже могу выковырять, но, опять же, на VB.
А вообще, лучше оращаться на форумы, посвященные программированию
sflash, не обижайся, но WM_MOUSE_DOWN - опускание кнопки мыши, а WM_MOUSE_RIGHT вообще такого не знаю.