saludos nuevamente, mira, te puedo dar otra solución, existe una API propia de Windows que permite invocar eventos del Mouse, dicha API es:
mouse_event:
solo debes posicionar el cursor sobre la region de dicho objeto "Boton", para esto puedes usar SetCursorPos y una vez situado el cursor sobre el objeto llamar a la API para simular un Click. Las coordenadas del objeto ya que pueder ser un objeto Gráfico como el SpeedButton de Delphi, puedes calcularlas obteniendo primeramente el "rectangulo" de la forma padre, con
GetWindowRect, y luego sumar aproximadamente valores al rect.Left y al Rect.Top hasta acercarte a al area que ocupa el objeto.
Debes tener en cuenta que puede que la ventana no tenga el Foco, para esto puedes usar SetForegroundWindow para traerla al frente.
Te muestro un ejemplo que se acaba de ocurrir, con la misma Ventana Ejecutar dando Click en Boton Aceptar:
Código Delphi
[-]
var
hWnd: Cardinal;
vRectWnd: TRect;
vBtnPos: TPoint;
begin
hWnd := FindWindow(nil, 'Ejecutar');
GetWindowRect(hWnd, vRectWnd);
vBtnPos.x := vRectWnd.Left + 135;
vBtnPos.y := vRectWnd.Top + 148;
SetCursorPos(vBtnPos.x, vBtnPos.y);
SetForegroundWindow(hWnd);
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0); mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
Puedes agregar otros detalles como capturar la posicion del cursor actual antes de simular el click y luego posicionar el cursor donde estaba orginialmente.
Que Crees??
Saludos,
AEFF!!