Ver Mensaje Individual
  #1  
Antiguo 08-02-2021
Avatar de aguml
aguml aguml is offline
Miembro
 
Registrado: may 2013
Posts: 885
Reputación: 11
aguml Va por buen camino
Problemas al emular clic derecho

Buenas, quisiera emular un clic derecho a cualquier ventana externa y tengo esto:
Código PHP:
void __fastcall TForm1::ButtonRightClicClick(TObject *Sender)
{
    if(
EditHWND->Text != ""){
      if(
IsWindow( (HWND)EditHWND->Text.ToInt() )){
         
SendMessage((HWND)EditHWND->Text.ToInt(), WM_RBUTTONDOWN0MAKELONG(coordenadasRelativas.x,coordenadasRelativas.y));
         
SendMessage((HWND)EditHWND->Text.ToInt(), BM_SETSTATE10);
         
SendMessage((HWND)EditHWND->Text.ToInt(), WM_RBUTTONUP0MAKELONG(coordenadasRelativas.x,coordenadasRelativas.y));
         
SendMessage((HWND)EditHWND->Text.ToInt(), BM_SETSTATE00);
      }
   }

Ese método me va genial con el clic izquierdo pero con el derecho no funciona en todas partes, hay veces que no sale el popup o que incluso tengo que pasear el puntero por la ventana para que salga. ¿Alguna idea?
Responder Con Cita