delphi xe10 调用外部命令的问题

[lao_yunger]

前言
电脑系统引导有两种方式，其一是MBR模式，即将淘汰的方式。另一个是UEFI启动方式，现在流行的方式。
function ExecAppWait（）说明参考网址为https://blog.csdn.net/wlanye/article/details/51744511
procedure TForm1.btn1Click(Sender: TObject);//注：这是MBR模式
begin
ExecAppWait（'BCD.BAT'）;//成功
｛BCD.BAT文件内容如下：
c:\windows\system32\bcdboot.exe c:\windows/ c: L zh-cn｝
参考网址http://blog.sina.com.cn/s/blog_858a1fc70106nrb4.html
end;

procedure TForm1.btn2Click(Sender: TObject); //（注：这是UEFI模式）
begin
ExecAppWait（'UEFI.BAT'） ;//画面一闪而过，不成功，F盘依然是空空的，但是在硬盘上双击UEFI.BAT文件却成功了。why!；
{UEFI.bat内容如下：
c:\windows\system32\bcdboot.exe C:\windows /s F: /f uefi /l zh-
}
//参考文档https://www.cnblogs.com/devilloki/p/5651478.html
//bcdboot c:\windows /s m: /f uefi /l zh-cn
end;


程序中已经用设置好default_app.manifest文件。其内容如下：
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<dependency>
<dependentAssembly>
<assemblyIdentity
type="win32"
name="Microsoft.Windows.Common-Controls"
version="6.0.0.0"
publicKeyToken="6595b64144ccf1df"
language="*"
processorArchitecture="*"/>
</dependentAssembly>
</dependency>
<trustInfo xmlns="urn:schemas-microsoft-com:asm.v3">
<security>
<requestedPrivileges>
<requestedExecutionLevel
level="requireAdministrator"
uiAccess="false"/>
</requestedPrivileges>
</security>
</trustInfo>
</assembly>