打开exe并传参

shellexecute(Application.Handle,'open',PWideChar('E:\控件\TMS.Scripter.Studio.Pro..6.0.2.0.Delphi.BCB.Registered-Lz0\Demos\idepro\ScripterProIDE.exe'),PWideChar(IntToStr(3)+' '+'uSearch.psc'),'',sw_show);