Zdravím, snažím se upravit kód na čtení HID usb , jedna z funkcí vypadá takto :
' Set up a windows hook to receive notification
' messages from the HID controller DLL - then connect
' to the controller
Public Function ConnectToHID(ByRef targetForm As Form) As Boolean
Dim pHostWin As Integer = targetForm.Handle.ToInt32
FWinHandle = pHostWin
pHostWin = hidConnect(FWinHandle)
FPrevWinProc = DelegateSetWindowLong(FWinHandle, GWL_WNDPROC, Ref_WinProc)
HostForm = targetForm
End Function
, target form je třída běžícího formuláře aplikace. Chtěl by ale posílat zprávy do jiné jednodušší třídy která bude mimo hlavní form a z ní se pouze budou aktivovat eventy (přes ně i nějaká ta hodnota) jen nevím jak by měla vypadat, v každém případě musí mít svůj vlastní handle ... J.
|