I am running a .bat file from delphi(2010).
procedure TForm1.Button2Click(Sender: TObject); var sCmd: String; Begin sCmd := Pwidechar(\'b4a_c2dm.bat\' +\' \
In order to execute a batch file, the program to be called is 'cmd' and its parameter should be the name of the batch file.
Regarding your program,
ShellExecute (application.handle, 'open', 'cmd', PChar(sCmd), nil, SW_MAXIMIZE)