como ejecutar archivo *.bat desde delphi 7
 

hola amigos del foro nuevamente yo kurono con otra duda y es q me gustaria ejecutar un archivo *.bat desde delphi 7 se ejecutar archivo *.exe desde delphi 7 pero cuando utilizo el mismo codigo para archivo bat no me funciona para darle una ayuda el codigo para ejecutar un archivo *.exe es el siguiente:

winexec('cmd.exe',sw_shownormal);

me pregunto si habra un codigo similar a este pero para archivo bat

Hola,

Prueba con "ShellExecute":

Código Delphi [-]
uses
  Windows, ShellApi;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(GetActiveWindow(),'open','archivo.bat',nil,nil,SW_NORMAL);
end;

no funciona aparece una ventana de dos aparentando q el archivo se va ejecutar pero se cierra de inmediato

Hola,

¿Puedes poner el código que utilizas?

aqui esta el codigo q utilizo

uses
windows,shellapi;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(GetActiveWindow(),'open','C:\Small Game\Enes\J2ME\makejar.bat',nil,nil,SW_NORMAL);
end;
end.

Hola,

Asegúrate de que el archivo en cuestión exista verdaderamente. Si echas un vistazo al ejemplo que adjunto verás que todo va como se espera. También puede ser que el archivo BAT se ejecute, pero, que, al no haber "pausa" alguna en el mismo, al terminar su ejecución la consola simplemente se cierre.

PD. Usa etiquetas [ DELPHI ] y verás qué bien quedan tus mensajes. :)

Código Delphi [-]
uses
  ShellApi;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  ShellExecute(0,'open','archivo.bat',nil,nil,SW_NORMAL);
end;

ok haora si funciono gracia espero ayudar algun dia a alguien como lo hacen ustedes