Ловля сообщений чужим окнам

[Kovu]

Есть такой код:
Sub SysFreeze
dim lp&
lp&=EnumWindows(addressof EnFunk,0)
end sub

function EnFunk(BYVAL hwnd as long, ByVal lpData as long)
if hwnd<> form1.hwnd then
redim preserve hwndmass(ubound(hwndmass)+1)
redim preserve PrevFunk(ubound(PrevFunk)+1)
hwndmass(UBound(hwndmass))=hwnd
PrevFunk(UBound(PrevFunk))=SetWindowLong _(hwnd,GWL_WNDPROC,addressof NewWinProc)
End If
EnFunk=1
End Function

function NewWinProc(ByVal hwnd as long,ByVal uMsg as Long, ByVal wParam as long,ByVal lParam as Long) as long
NewWinProc=0
End Function


А заморозить таким способом можно только своё окно(если убрать условие) или ещё лучше VB при отладке

[tyomitch]

Вопрос-то в чём?

[Amed]

А заморозить таким способом можно только своё окно??? (если убрать условие) или ещё лучше VB при отладке

[Kovu]

Вопрос в том, почему сабклассинг нельзя применить к чужим окнам?

[alibek]

Почему нельзя? Можно. В Windows 9x.

[Kovu]

Amed
Если ты не знаешь , что такое условная конструкция, я не виноват.

[Kovu]

alibek
А в ХР? Может кто-нибудь знает как?

[Amed]

Amed
Если ты не знаешь , что такое условная конструкция, я не виноват.

Моя цитата была адресована Тёмычу.

[Kovu]

Amed
Ну извини, обидел

[Amed]

Да не-е, я не обиделся, отнюдь.

[tyomitch]

Вопрос в том, почему сабклассинг нельзя применить к чужим окнам?

Потому что у каждого процесса своё адресное пространство. Значит, сабклассер должен быть в том же процессе, где и окно. Как его туда запихнуть - твоё личное дело. Можно, например, через хук ( http://bbs.vbstreets.ru/viewtopic.php?t=16020 )