Simular click!
 

Hola amigos:

No he tenido problemas simulando teclas pero la verdad no se como hacerlo con un click.
Uso este procedimiento para las teclas

Código Delphi [-]
var
  Input: TInput;
begin
  Input.Itype := INPUT_KEYBOARD;
  Input.ki.wVk := VK_space; // Tecla a simular
  // Presionar tecla
  SendInput(1, Input, SizeOf(Input));
  // Soltar tecla
  Input.ki.dwFlags := KEYEVENTF_KEYUP;
  SendInput(1, Input, SizeOf(Input));
  application.ModalStarted;
end;

si alguien puediera decirme como simular los cliks le estaria agradecido.


**Me habia olvidado, si es posible también para elegir las coordenadas donde se hara el click.

Hola,

Código Delphi [-]
Windows.mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Windows.mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);

Las anteriores instrucciones simulan el "clic" del botón izquierdo de un ratón.

ok
 

ok amigo lo probare, gracias por responder.

hola!. Lo he provado y funciona muy bien pero no logro establecer las cordenadas donde quiero q el click se haga:

Código Delphi [-]
setcursorpos(1150,350);
Windows.mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
sleep(500);
Windows.mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);

Solo funciona en windows, la idea es q funcionase tambien en elprograma que
deseo, a ver si alguien me ayuda.


**El click funciona perfectamenteen la otra aplicación, el tema es que se tiene q mover a las coordeanadas que le indico y no funciona

hola de nuevo, estuve mirando la funcion q tu me escribiste y encontre, que puedo setear la posicion del mouse de esta manera:

Código Delphi [-]
windows.mouse_event(mouseeventf_move+mouseeventf_absolute,x,y,0,0)

El problema es que la punta del monitor para esa funcion es (65535,65535) en vez de (1280,1024) no entiendo como es esto =.=

Help PLz!

bueno ya lo solucione, lo hice al modo cavernicola con tabla de 3 simples.

para el q esta trabajando en lo mismo solo le doy un consejo:

los valores del monitor los toma asi ^^ me causo un par de problemas de calculo,
0 _________________>X
|
|
|
|
|
|
|
Y
gracias dex por tu respuesta.