Question

delphi shellexecute 传递多个参数

我想用delphi调用一个外部程序，并且让程序打开两个文件。
s1:='C:\Micaps3.2.exe';
s2:='e:\13062320.000‘;
s3:='e:\13062408.000';
shellexecute(handle,nil, pchar(s1),pchar(s2),nil,sw_shownormal);
上面代码是打开一个文件的，打开两个文件我不知道该怎么写。求高手帮忙~！

Answer 1

参数间用空格隔开

procedure TForm1.Button1Click(Sender: TObject);

var

 s1:string;

 s2:string;

 s3:string;

begin

 s1:='C:\Micaps3.2.exe';

 s2:='e:\13062320.000';

 s3:='e:\13062408.000';

 ShellExecute(Application.Handle, 'open', s1, s2 + ' ' +  s3 , nil, SW_SHOW );

end;