Safe subclassing - no more crash - d/l the simple codes here

[jian2587]

I've written a simple ActiveX DLL for use with subclassing.
If you've always crashed ur machine for forgetting to unsubclass
the window, this simple DLL will help you around on that.

'General Declarations
Dim WithEvents myHook As WindowHook.Hook
 
'In a procedure
Set myHook = New WindowHook.Hook
myHook.CallDefaultProc = True 'Let default procedure to process
                                                  'the messages, always set to True
myHook.HookWindow Me.hWnd
 
'And there's only one event:
Private Sub myHook_WindowMessage(hwnd As Long, uMsg As Long, wParam As Long, lParam As Long)
'Your codes here
End Sub

well, not as good as Merrion's, but this serve as a primitive
but easy subclassing method that's crash prone(due to its DLL
nature) and can be instatiated - which means you can subclass
a lot of stuffs. If you code it yourself, you've to make a lot of
module window message handling procedures, and that's very
undynamic.