Ver Mensaje Individual
  #5  
Antiguo 13-07-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola river_1.

Lo único que se me ocurre para que no te funcionen es que no estes indicando bién la ruta o el nombre de archivo.

Realizá una simple prueba, crea un archivo llamado PRUEBA.BAT en el directorio raíz ( C:\ ) con el siguiente contenido:
Código:
@ECHO OFF
CLS
ECHO EJECUTANDO EL ARCHIVO: PRUEBA.BAT
PAUSE
Y luego llamalo así:
Código Delphi [-]
...
uses ShellApi;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle,'open','C:\PRUEBA.BAT',nil,nil,SW_SHOWMAXIMIZED);
end;

Del mismo modo el código de Caro, también funciona correctamente:
Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
var
  Path: string;
begin
  Path:= 'C:\PRUEBA.BAT';
  ShellExecute(Handle,nil,PChar(Path),'','',SW_SHOW);
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita