El 'ShellExecute' no me deja hacerlo, me da un error:
La línea de código es la siguiente, igual cometo algún error:
Código:
ShellExecute(Handle, 'OPEN', PChar(edit1.Text), Pchar(0), PChar(ExtractFilePath(edit1.Text)), 0)
En edit1 esta la ruta del ejecutable, el parámetro que le tengo que pasar es '0'.
Con respecto al .bat, también he probado pasandoselo como parámetro, ejecuta el bat y cierra el 'command', entonces sigue sin funcionar.
Código:
cmd := '/ceventos.bat';
...
WinExec(PChar('command.com ' + cmd),1);
Y ejecutando direcctamente el .bat me sigue pasando lo mismo, se cierra y no mata el servicio en cuanto se ejecuta.
Seguramente es que no hago correctamente o se me pasa algo, pero estoy un poco engachao.
Muchas gracias a todos por los consejos.