Click do Mouse

[soluvel]

como que eu faço para simular o click do mouse numa cordenada x y na tela do computador??/

quais os comandos?

como que eu faço para simular o click do mouse so que presionado?

e como que eu faço para soltar o click depois que o mouse presionado já xegou no destino?

perguntas adicionais.....

com o cheat engine da para catar codigos nos programas em execução e alterar os values...............................

como que eu faço um programa que entra em um determinado codigo de um outro programa e muda e desmuda o value , de acordo com o que eu programar?

vlw pessoal

brigadão!!!

[Jhonas]

como que eu faço para simular o click do mouse numa cordenada x y na tela do computador??/

quais os comandos?

como que eu faço para simular o click do mouse so que presionado?

e como que eu faço para soltar o click depois que o mouse presionado já xegou no destino?

{O exemplo abaixo simula o pressionamento da tecla do botão esquerdo do mouse em uma determinada posição da tela. No exemplo serão utilizados dois botões (Button1 e Button2), ao clicar no Button2 será executado o onClick do Button1 como se o mouse tivesse clicado sobre ele }

procedure TForm1.Button1Click(Sender: TObject);
begin
   ShowMessage('Button 1 clicked');
end;


procedure TForm1.Button2Click(Sender: TObject);
var
  Pt : TPoint;
begin
  Application.ProcessMessages;
  {Obtém o point no centro do Button1} 
  Pt.x := Button1.Left + (Button1.Width div 2);
  Pt.y := Button1.Top + (Button1.Height div 2);
  {Converte Pt para as coordenadas da tela } 
  Pt := ClientToScreen(Pt);
  Pt.x := Round(Pt.x * (65535 / Screen.Width));
  Pt.y := Round(Pt.y * (65535 / Screen.Height));
  {Move o mouse} 
  Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_MOVE, Pt.x, Pt.y, 0, 0);
  {Simula o pressionamento do botão esquerdo do mouse} 
  Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTDOWN, Pt.x, Pt.y, 0, 0);
  { Simula soltando o botão esquerdo do mouse } 
  Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTUP, Pt.x, Pt.y, 0, 0);
end;

Outros tópicos sobre o assunto que podem interessar

http://scriptbrasil.com.br/forum/index.php...st&p=292445

http://scriptbrasil.com.br/forum/index.php...st&p=538371

como que eu faço um programa que entra em um determinado codigo de um outro programa e muda e desmuda o value , de acordo com o que eu programar?

Qual a finalidade ???

abraço

[soluvel]

{O exemplo abaixo simula o pressionamento da tecla do botão esquerdo do mouse em uma determinada posição da tela. No exemplo serão utilizados dois botões (Button1 e Button2), ao clicar no Button2 será executado o onClick do Button1 como se o mouse tivesse clicado sobre ele }

que dizer que o aplicativo criado no delphi, vai ter um botao que quando eu clicar automaticamente executa a função do mause: clicar numa cordenada x y da tela?

Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_MOVE, Pt.x, Pt.y, 0, 0);

{Simula o pressionamento do botão esquerdo do mouse}

Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTDOWN, Pt.x, Pt.y, 0, 0);

{ Simula soltando o botão esquerdo do mouse }

Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTUP, Pt.x, Pt.y, 0, 0);

que dizer que se eu usar apenas o evento de presionamento, o mouse fica presionado direto?

para isso eu tenho tambem que por o evento de soltar o botao?

como que eu faço um programa que entra em um determinado codigo de um outro programa e muda e desmuda o value , de acordo com o que eu programar?

Qual a finalidade ???

abraço

jogo ^^

e que eu preciso que o value de um codigo seja mudado em um determinado tempo..

obs:

1-como que eu faço para saber as cordenadas da tela do meu computador?Existe algum programa?

2-como seria tambem os comandos de click com o butao diteito do mouse?

vlw

Editado Setembro 4, 2009 por soluvel

[Jhonas]

que dizer que o aplicativo criado no delphi, vai ter um botao que quando eu clicar automaticamente executa a função do mause: clicar numa cordenada x y da tela?

Te passei apenas um exemplo, voce deve adptar o código ao seu uso

que dizer que se eu usar apenas o evento de presionamento, o mouse fica presionado direto?

para isso eu tenho tambem que por o evento de soltar o botao?

A sua pergunta foi:

como que eu faço para simular o click do mouse so que presionado?

o outro comando é para simular "soltando o botão esquerdo do mouse"

1-como que eu faço para saber as cordenadas da tela do meu computador?Existe algum programa?

Voce quer coordenadas do Form Ativo ou Janela do windows ?

http://www.tecnobyte.com.br/dica2.html

http://scriptbrasil.com.br/forum/index.php...st&p=154110

Faça uma busca no forum .. vai encontrar mais informações sobre uso do mouse

http://scriptbrasil.com.br/forum/index.php...ite=coordenadas

2-como seria tambem os comandos de click com o butao diteito do mouse?

Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_RIGHTDOWN, Pt.x, Pt.y, 0, 0);

abraço

[soluvel]

achei bastante coisa util nesses topicos........

mais eu não estou conseguindo usar o comando

setmousepos(x,y);

ajuda?

vlw

obs: consegui achar a cordenada da tela

[soluvel]

?????????????

[Jhonas]

Soluvel ... procure sempre fazer uma pesquisa no forum pra ver se acha alguma coisa

http://scriptbrasil.com.br/forum/index.php...st&p=154110

Outras informações

http://www.planetadelphi.com.br/dica/2202/...tos-com-o-mouse

http://www.leadtools.com/help/leadtools/v1...ouseDownD4T.htm

http://www.kod27.com/kod_detay/8301/delphi-event-ornek.html

abraço