Código Delphi [-] var Path: string; begin Path:= 'C:\PRUEBA.BAT'; ShellExecute(Handle,nil,'cmd.exe',PChar('/C "' + Path + '"'),'',SW_SHOW);
var Path: string; begin Path:= 'C:\PRUEBA.BAT'; ShellExecute(Handle,nil,'cmd.exe',PChar('/C "' + Path + '"'),'',SW_SHOW);