[Resolvido]Posição do mouse

Bom dia
Como posso fazer para definir a posição que desejo que o cursor do mouse apareça em meu formulário?
Obrigado pela ajuda.

Abraço

Marcelo

Boa tarde, Mriegel

Utilize (desconheço autor)

Declare Function SetCursorPos& Lib "user32" _
(ByVal X As Long, ByVal Y As Long)

'Como posso mover o cursor do mouse?
'Você pode usar o SetCursorPos função da API. Ele aceita dois parâmetros. Estas são a posição x ea posição y no pixel coordenadas de tela. Você pode obter o tamanho da tela chamando a função GetSystemMetrics com as constantes correta. Este exemplo coloca o cursor do mouse no canto superior esquerdo.
Sub exemplo()
Dim t&
t& = SetCursorPos(0, 0)
End Sub

Cumprimentos,

Quando incluo estes seus comandos, não conigo nem mais abrir meu relatorio

Aqui neste link tem para todos os gostos

http://www.google.pt/#hl=pt-PT&sa=X&ei=Cmi9Tf3lGoG2hAfQweTBBQ&ved=0CBcQBSgA&q=como+posso+mover+o+cursor+do+mouse%3F&spell=1&biw=990&bih=552&bav=on.2,or.r_gc.r_pw.&fp=4048809e400d90c3

Conseguiu resolver, amigo?

Para ser bem sincero, ainda não.
Nas HP indicadas não encontrei nada que resolvesse minha questão.
Abraço
Marcelo

Mesmo na microsoft não tem o que você pretende

Gostaria de perceber qual a ideia do posicionamento do cursor.

Qual a finalidade ?

Pelo que percebi ainda é mais simples que o que parece.

Vejamos se é isto:

Você quer que ao abrir o seu form, o cursor fique "Por exemplo"

No Campo "txtNome" e no final, então se o campo tiver lá "JPaulo" o cursor irá ficar depois da ultima letra "JPaulo"|


No evento VBA ao carregar do form, mande o foco;

Private Sub Form_Load()
Me.SeuCampoNome.SetFocus
End Sub


Quando o campo receber o foco, mande o cursor;

Private Sub MNome_GotFocus()
Me.SeuCampoNome.SelStart = 6
End Sub

Aguardo...

O que realmente desejo, é que abrir o formulário, o cursor esteja no canto superior esquerdo.

A finalidade desta solução é que tenho alguns relatório que não consegui inserir botão para a impressão, então, quando clico na tecla direita do mouse, abro uma janela com dados para impressão.
Gostaria de ao abrir o formulário esta janela já estivesse aberta(isto consegui), mas no canto superior esquerdo.

Continuo sem entender.

O cursor tem de estar onde ?

No canto superior esquerdo do quê ?

Tenho um relatório aberto na tela, e gostaria que o cursor estivesse localizado no canto superior esquerdo da tela.

Me parece que o amigo quer é que o menu popup fique fixo no canto superior esquerdo do relatório. É isso mesmo?

Acho que não.
Preciso que sempre que abrir o relatório XX, o cursor do mouse seja deslocado para o canto superior esquerdo deste relatório.

Boa noite MRiegel....

Pra ajudar você agente precisa entender primeiro o que pretende, e o que estou entendendo é que o relatório já está aberto e tem um formulário afrente do mesmo, e o que você quer é que o cursor do mouse fique posicionado acima deste relatório seria isto,..... se não, tenta colocar uma cópia do banco pra que possamos acompanhar e falar a mesma lingua....

Boa Noite

Estou chegando agora. Sou super novato no access. To fazendo meu primeiro projeto para o meu trabalho. Este problema do mouse eu tambem tenho.

Por exemplo, o campo data de nascimento do meu formulario, esta com mascara de entrada e se o usuario utilizar o teclado(tecla TAB) o cursor cai no inicio do campo, porem se ele utilizar o mouse, o cursor se localiza exatamente onde ele clica. Teria como fazer com que com o mouse funcionasse exatamente como o TAB.

Aguardo contato

O Campo já contém dados ou é para inserir dados? Se for para inserir pode colocar no evento click Me.nomedocampo=Null e o cursor vai para o início do campo.

Obrigado

Perfeito.

Obrigado pelo retorno

Me permitam um aparte? Eu não entendi. Se o campo está vazio, o cursor já não ficaria no início dele de qualquer forma?

Ao fazer clique, amigão, Podes fazer clique em qualquer parte da caixa de texto.

Pois é, isso mesmo, qdo clico pode ficar em qualquer parte.
O problema era justamente este. O usuario clica em qq lugar e digita, a data, que tem mascara de entrada, vai dar erro. A mesma coisa acontecia com o campo telefone (99)9999-9999, se clicar no meio por exemplo e digitar nao vai conseguir digitar corretamente. Porem, a dica do amigo resolveu este problema.

Ah, agora entendi. Trata-se de campo com máscara de entrada. Bem, se resolveu, vamos colocar o Resolvido. Caso necessário, pode retornar à questão.

Obrigadao

Criquio

Este está resolvido, mas o tópico não foi aberto por este colega, o assunto ainda não foi resolvido, pelo que leste mal o tópico. Deve ficar para já em aberto por mais algum tempo.

Abs

É verdade. Antes de responder até reparei nisso, mas depois acabei esquecendo e me confundi

O colega não disse mais nada, mas vamos aguardar mais um pouco. Abraço

Boa tarde
Infelizmente ainda não consegui a solução desejada para minha situação.
Mas, não é um aspecto que me atrapalhe ou dificulte a utilização de meu programa.
Darei o tópico como resolvido, e continuarei a buscar uma solução.
Assim que conseguir , publico-a imediatamente.
Obrigado pelo retorno e ajuda.
Abraço

Marcelo

Ok, bom trabalho

Boa Tarde

O meu problema foi resolvido, com a dica do amigo, gostaria de agradecer a todos.

Bom trabalho e obrigado pelo retorno

Boa Tarde

Amigo Vieira

A dica resolveu meu problema como havia postado aqui. Na inclusao tudo perfeito. Porem, hoje percebi que ao aceesar o formulario e tentar editar qualquer campo, ele zera todos os campos os quais utilizei o Me.Nome_campo = Null. Teria como evitar isso?

Tente assim no evento ao fazer click


meucampo.SelStart = 0
meucampo.SelLength 0 =

Rapaz, sei nem como agradecer. Funcionou perfeitamente

Mais uma vez, Obrigado

Abração amigo e bom trabalho