Delphi 调用 cmd.exe 执行 *.bat 文件的问题 ( 积分: 50 )

质

质数

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-31

• #1

已知路径 ：DIR;
已存在文件：a.bat 在路径 DIR 下;
现在要调用 cmd.exe 执行 DIR 下的 a.bat;
应该怎么做啊？

我使用下面语句不行：
ShellExecute(Handle, 'open',PChar('cmd.exe'),PChar('/k DIR/a.bat'), nil, SW_SHOW);

cmd.exe 打开后路径指在应用程序所在的路径。。。

请高人指点。(不能改变应用程序所在路径)

 

W

wql

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-31

• #2

WinExec(PChar('c:/winnt/system32/cmd.exe /c DIR/a.bat'),SW_NORMAL);

 

S

sadnui

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-31

• #3

ShellExecute(Handle, 'open',PChar('cmd.exe'),PChar('/k DIR/a.bat'), sysdir, SW_SHOW);

 

质

质数

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-31

• #4

wql 你的方法不行呀，cmd 启动后，路径还是指在应用程序所在的路径。
必须将路径转到 DIR 后执行 a.bat 才可以的。

 

质

质数

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-31

• #5

谢谢！ sadnui 我将你的代码修改如下后实现了我的需求，谢谢！
ShellExecute(Handle, 'open',PChar('cmd.exe'),PChar('/k DIR/a.bat'), PChar(DIR), SW_SHOW);