Delphi - Muy urgente!!! como ejecutar un Batch File

Hola no se com ejecutar con un botn normal un preceso batch file.
Al clicar el boton haga el proceso.
Muchas gracias

if ShellExecute(Form1.Handle, nil, 'archivo.bat',
nil, nil, SW_SHOWNORMAL) <= 32 then
Application.MessageBox('No se pudo ejecutar el proceso por lotes',
'Error', MB_ICONEXCLAMATION);

Para más inforamación sobre ShellExecute mira mi artículo
"Ejecutando una aplicación externa": http://www.latiumsoftware.com/es/delphi/00002.php

Espero que te sirva.

Ernesto D'Spirito
http://www.latiumsoftware.com/es/index.php