如何使用Delphi正确执行.bat文件

时间:2012-05-05 01:06:27

标签: delphi batch-file

我正在运行delphi(2010)的.bat文件。

procedure TForm1.Button2Click(Sender: TObject);
var sCmd: String;
 Begin
sCmd := Pwidechar('b4a_c2dm.bat' +' ' +'send ' + Trim(Edit1.Text)+' '  + Trim(edit2.Text ));
ShellExecute(0, 'open', 'b4a_c2dm.bat', PChar(sCmd), nil, SW_SHOWMAXIMIZED);
   end;

这会打开cmd.exe并在cmd.exe中传递正确的字符串,但是

.bat文件(java -cp b4a_c2dm.jar anywheresoftware.b4a.c2dm.C2DM%*)中的行如何显示在cmd.exe窗口中,而不是让.bat文件完成其工作。< / p>

有人可以帮助我。

1 个答案:

答案 0 :(得分:16)

为了执行批处理文件,要调用的程序是“cmd”,其参数应该是批处理文件的名称。

关于您的计划,

ShellExecute (application.handle, 'open', 'cmd', PChar(sCmd), nil, SW_MAXIMIZE)