Como mostrar uma janela no lugar a onde o esta o cursor?

Question

Boa Noite!

Criei uma form como BorderStyle = None e vou usa-la como se fosse um ContextMenuStrip. Não quero usar o ContextMenuStrip porque não atende todas as minhas necessidades. Então quero que quando o usuário clicar com o botão direito em uma textbox é mostra essa form no local a onde foi clicado como se fosse uma contextmenustrip. Tem como fazer isso?

Obrigado desde já!

Answer 1

Boa tarde Edison,

Como assim, você quer que abra uma janela pra mostrar onde está o cursor do mouse?

Att,

---

Ricardo Cortes Microsoft Contingent Staff

Esse contedo e fornecido sem garantias de qualquer tipo, seja expressa ou implicita.

MSDN Community Support

Answer 2

Edison,

Tem sim...tente o seguinte código:

Public Sub New()
	InitializeComponent()

	Me.MouseClick += New MouseEventHandler(AddressOf Form1_MouseClick)
End Sub

Private Sub Form1_MouseClick(sender As Object, e As MouseEventArgs)
	Dim t1 As New teste1()
	t1.StartPosition = FormStartPosition.Manual
	t1.Location = GetCursorPosition()
	t1.Show()
End Sub

<StructLayout(LayoutKind.Sequential)> _
Public Structure POINT
	Public X As Integer
	Public Y As Integer

	Public Shared Widening Operator CType(point As POINT) As Point
		Return New Point(point.X, point.Y)
	End Operator
End Structure

<DllImport("user32.dll")> _
Public Shared Function GetCursorPos(ByRef lpPoint As POINT) As Boolean
End Function

Public Shared Function GetCursorPosition() As Point
	Dim lpPoint As POINT
	GetCursorPos(lpPoint)

	Return lpPoint
End Function

Espero ter ajudado e boa sorte!

---

Não esqueça de marcar como útil uma resposta que te ajude.
"A diversão é a alma do negócio"

Answer 3

Caso tenha conseguido a solução finalize sua Thread marcando a resposta

---

A vantagem de ser inteligente é que podemos fingir que somos imbecis enquanto ao contrario é completamente impossivel