判断文件是否存在，不存在执行代码

Question

我是个菜鸟请懂的大侠帮忙看看，谢谢
 var
A: string;
B: string;   
begin
//==========================  A := 'CMD.exe';
  B := SystemDir+'cmd.exe';
 begin
      if FileExists(A) then    //判断文件是否存在，
    
    WinExec(PChar(A) , SW_SHOW);//存在就直接执行    else    (这里提示错误)        begin   //   不存在就执行代码
       CopyFile(pchar(b),PChar(A),False);
     WinExec(PChar(A), SW_SHOW); //SW_SHOW or SW_HIDE      end;
     end;  正确的判断语句应该怎么写呢，谢谢。

Answer 1

WinExec(PChar(A) , SW_SHOW);
去了后边的分号，
WinExec(PChar(A) , SW_SHOW)