Ejecutar Archivo bat

[fran]

A mi con este codigo me funciona sin problmas:

procedure TForm1.Lista1Click(Sender: TObject);
begin

   WinExec(PChar('D:\.....\Fichero.bat'),SW_SHOWNORMAL);

end;

Espero que te sirva,
Un Saludo.

[tertuliano]

ahora me anduvo, gracias !
me anduvo con esto ultimo

Código Delphi [-]
 
WinExec(PChar('D:\.....\Fichero.bat'),SW_SHOWNORMAL);

Pero la verdad que me parecia que lo habia usado ya a eso.