|
Imports System.Windows
Imports System.Windows.Interop
Imports System
Public Class WndProcWindow
Inherits Window
Protected Overrides Sub OnSourceInitialized(e As EventArgs)
MyBase.OnSourceInitialized(e)
Dim source As HwndSource = PresentationSource.FromVisual(Me)
source.AddHook(AddressOf WndProc)
End Sub
Protected Overridable Function WndProc(hwnd As IntPtr, msg As Int32, wParam As IntPtr, lParam As IntPtr, ByRef handled As Boolean)
Return IntPtr.Zero
End Function
End Class
|
By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.
If a file you wish to view isn't highlighted, and is a text file (not binary), please
let us know and we'll add colourisation support for it.
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.