Delphi 调用ShellExecuteEx 打开外部文件时会卡住,具体代码见内

都什么年代了还用winexec
var ShellInfo:SHELLEXECUTEINFOW;
begin
ShellInfo.cbSize := Sizeof(SHELLEXECUTEINFOW);
  ShellInfo.fMask := SEE_MASK_NOCLOSEPROCESS;
  ShellInfo.Wnd := 0;// lv_atta.Handle;
  ShellInfo.lpVerb := nil;
  ShellInfo.lpFile := 'c:\windows\WindowsUpdate.log';
  ShellInfo.lpParameters := '';
  ShellInfo.lpDirectory := nil;
  ShellInfo.nShow := SW_SHOW;
  ShellExecuteExW(@ShellInfo);