判断文件是否存在，不存在执行代码
我是个菜鸟请懂的大侠帮忙看看，谢谢
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;

正确的判断语句应该怎么写呢，谢谢。

[解决办法]
WinExec(PChar(A) , SW_SHOW);
去了后边的分号，
WinExec(PChar(A) , SW_SHOW)