Ejecutar un .exe

[[cHackAll]]

Hola a todos, espero no llegar muy tarde

Empezado por nosferatu177

hola buenas tardes, alguien de ustedes podria decirme como hacer q se ejecute un archivo .msi en el evento onclick;es q extoy haciendo un instalador y no logro hacer q se ejecute :S, ya utilice WinExec, pero creo q solo es con los .exe; gracias de antemano

Código Delphi [-]
 WinExec('msiexec /i c:\windows\system32\sasetup.msi', SW_SHOW);

Empezado por JULIPO

Pero que pasaria si ademas cuando cierre mi aplicacion, quiero saber si el programa que abri desde mi aplicacion al presionar el boton esta aun ejecutandose y si es asi cerrarlo ;

Este hilo se refiere a la ejecucion de un programa al presionar un boton;

Yo quiero saber si al cerrar mi aplicacion el programa que ejecute al presionar el boton aun esta activo y si es asi cerrarlo junto a mi aplicacion

espero sea clara la pregunta

gracias por su ayuda

Código Delphi [-]
 
...
 
implementation
 
{$R *.dfm}
 
var
 si: TStartupInfo = (cb: SizeOf(TStartupInfo));
 pi: TProcessInformation;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
 CreateProcess(nil, 'notepad', nil, nil, False, 0, nil, nil, si, pi);
end;
 
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
 CanClose := WaitForSingleObject(pi.hProcess, 0) = WAIT_OBJECT_0;
 if not CanClose then
  MessageBox(0, 'No puedes cerrar la aplicacion hasta que cierres el Bloc de notas', nil, 0);
end;
 
end.

Saludos.