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