Hola a todos, espero no llegar muy tarde
Cita:
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);
Cita:
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.