使用Delphi在cmd中运行多个命令

Vla*_*pin 3 delphi delphi-xe8

我试图cmd从Delphi 使用以应用一些命令。我使用以下代码

ShellExecute(Application.handle, 'runas', 'cmd.exe',
  PChar('/c command to do '), nil, SW_show);
Run Code Online (Sandbox Code Playgroud)

我想在同一执行中运行多个命令

/c command1 command2 command3
Run Code Online (Sandbox Code Playgroud)

我已经制作了一个bat文件来运行一些命令。但是我不喜欢在项目中存储蝙蝠的想法。我可以在一个执行中应用多个命令吗?能做到吗?

Eug*_*neK 5

您可以尝试使用&&分隔命令,这是有效的示例

  ShellExecute(Application.handle, 'open', 'cmd.exe',
    PChar('/c "copy /Y file1.txt file2.txt&&copy /Y file2.txt file3.txt"'), nil, SW_show);
Run Code Online (Sandbox Code Playgroud)