新
新手101010
Unregistered / Unconfirmed
GUEST, unregistred user!
我在程序中启动另一个程序(A), 一般的情况是没有错的, 但有时我的程序就会启动不起来另外的程序(A),当另外程序(A)启动失败时, 我的程序也会报异常, 下面是代码<br>var<br> s: String;<br> i: integer;<br> info:TStartUpInfo;<br> pinfo:TProcessInformation;<br> bCreateProcess: boolean;<br>begin<br> FillChar(info,sizeof(info),#0);<br> with info do<br> begin<br> cb:=sizeof(info);<br> dwFlags:=StartF_UsesTDHandles or STARTF_USESHOWWINDOW or STARTF_USEPOSITION;<br> lptitle:=nil;<br> wShowWindow:=SW_Show;<br> end;<br> bCreateProcess := createprocess(NiL,pchar(FileName),nil,nil //FileName一定不会为空的<br> ,True,CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS,nil<br> ,pchar(ExtractFilePath(MirSetup.M2Server)),info,pinfo);<br>End;<br>我用ShellExecute也有过同样的情况, 不知道大家有没有遇到过, 这个问题应该怎么解决。