Суть довольна проста при попытке перехватывать сообщения
WH_MSGFILTERпрограммка провисает в момент изменения границ окна, причем если поставить в функции обработки бек поинт - то все работает прекрасно, убираешь - виснет.

такое ощущение, что функция выполняется тысячи раз подряд.
Такой код (бейсик) в функции обработки вызывает выход из зависания, но в чем причина???

Public Function obrabotka(ByVal nCode As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
counter1 = counter1 + 1
If counter1 > 10000 And nCode = 4 Then
counter1 = 0
MsgBox "1"
End If
End Function


В других вариантах обработок (папример WH_SHELL) все работает нормально (более-менее)


на всякий случай кусок простановки хука (бейсик)
CurrentHook = SetWindowsHookEx(-1, adrr_proc, 0, tr_id)

Читаем. там других хуков нет.

CallNextHookEx(CurrentHook, nCode, wParam, lParam) возвращает 0, а от наличия или отсутствия ничего не зависит, стабильно виснет.
относительно
nCode , при провисании он =4 (изменение рамера).

Еще еще идеи ??

убрал некст - для простоты отображения.