Ver Mensaje Individual
  #2  
Antiguo 22-11-2009
Avatar de aeff
aeff aeff is offline
Miembro
 
Registrado: oct 2006
Ubicación: Cuba, Guantánamo
Posts: 348
Reputación: 18
aeff Va camino a la fama
saludos, bueno mira, ahora se me ocurre algo sencillo, consiste en simular que se presionó el botón "Aceptar" de la ventana "Ejecutar" de Windows,

primero, implementa esto en algún evento (puede ser el OnClick de un Button):

Código Delphi [-]
var
  hWnd, hBtn, btnID: Cardinal;
begin
  hWnd  := FindWindow(nil, 'Ejecutar');
  hBtn  := FindWindowEx(hWnd, 0, 'BUTTON', 'Aceptar');
  btnID := GetWindowLong(hBtn, GWL_ID);
  SendMessage(hWnd, WM_COMMAND, btnID, 0);

claro, debes asegurarte de que hallas abierto la Ventana Ejecutar ¿ok? luego ejecutas tu aplicación y seguidamente el evento en el que implementaste el código anterior.

espero que hallas entendido y puedas sacar una solución a tu problemática.
saludos,
aeff!!
Responder Con Cita