Como fazer o MakeLParam?

Question

Oi, eu tenho uma duvida a respeito de como fazer o LParam, pois eu vi varios diferentes para se usar com sendmessage(hwnd, wm_mousemove, ?, "LPARAM")

tipo:

    Private Function MakeDWord(ByVal LoWord As Integer, ByVal HiWord As Integer) As Long
        MakeDWord = (HiWord * &H10000) Or (LoWord And &HFFFF)
    End Function

    Shared Function MakeLParam(ByVal LoWord As Integer, ByVal HiWord As Integer)As IntPtr
        Return (HiWord << 16) Or (LoWord And &HFFFF)
    End Function

Function MakeDWord(ByVal wLo As Integer, ByVal wHi As Integer) As Long 
    MakeDWord = (wHi * 65536) + (wLo And &HFFFF&) 
End Function 

Public Function HiWord(wParam As Long) As Integer

   If wParam And &H80000000 Then
      HiWord = (wParam \ 65535) - 1
   Else
      HiWord = wParam \ 65535
   End If

End Function


Public Function LoWord(wParam As Long) As Integer

   If wParam And &H8000& Then
      LoWord = &H8000& Or (wParam And &H7FFF&)
   Else
      LoWord = wParam And &HFFFF&
   End If

End Function

Public Function MAKELPARAM(ByVal wLow As Long, ByVal wHigh As Long) As Long
        MAKELPARAM = LoWord(wLow) Or (&H10000 * LoWord(wHigh))
End Function

Como ele funciona, com 2 monitores que tem coordenada negativa como fazer?

Answer 1

Bom dia Jean,

Por gentileza, você poderia nos dar mais algumas informações sobre o que está desenvolvendo?

Atenciosamente,

---

Robson William Silva

Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita

MSDN Community Support

Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

Answer 2

Bom dia,

Devido a falta de interação do autor dessa pergunta,

essa thread está sendo fechada. Caso o problema ainda

esteja ocorrendo, favor abrir uma nova thread.

Atenciosamente,

---

Robson William Silva

Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita

MSDN Community Support

Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.