从delphi7中的按钮单击运行批处理文件

Question

我有一个批处理文件和一个在delphi7中开发的应用程序。两者都很好。我想在单击按钮时运行批处理文件。我该怎么办？

谢谢尼尔森

Answer 1

使用在ShellAPI中声明的ShellExecute。

ShellExecute(
    MainForm.Handle,
    'open',
    PChar(scriptfilename),
    PChar(params),
    PChar(workingdirectory),
    SW_SHOW
);

Answer 2

 var
 exe_start_map:string;
 begin
  exe_start_map:=(ExtractFileDir(Application.ExeName));     
   winexec(PChar(exe_start_map+'\yourfile.bat'),sw_show);
 end;

您必须在使用列表中添加ShellApi