Ver Mensaje Individual
  #5  
Antiguo 09-02-2011
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Reputación: 17
rgstuamigo Va por buen camino
Arrow

Bueno... creo que no has buscado bien; de todas formas puedes hacerlo de la siguiente forma:
Digamos en el evento OnClick de un boton:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var H:THandle;
begin
WinExec('C:MyArchivo.exe',SW_SHOWNORMAL);// ejecuto la aplicacion externa
H:=FindWindow(Nil,'Aqui va el "Caption de Ventana" de la aplicacion ejecutada');//Busco el Handle por su "nombre" de la ventana 
                                                                       //de la aplicacion que ejecuté

if H<>0 then // si encuentra una ventana con ese Caption
 PostMessage(H,WM_KEYDOWN,VK_RETURN,0); // le mando un mensaje para que se pulse la tecla RETURN (ENTER)
end;
Tambien si lo deseas puedes pulsar cualquier boton de la aplicacion externa, tal como se indica en éste hilo.
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7

Última edición por rgstuamigo fecha: 09-02-2011 a las 15:17:54.
Responder Con Cita