A função FileExists retorna True se o arquivo existe e False se não existe.
Para testar:
procedure TForm1.Button1Click(Sender: TObject); begin if FileExists('C:\Tecnobyte\SAC_Free\SAC.exe') then ShowMessage('O arquivo existe.') else ShowMessage('O arquivo não existe.'); end;
O conteúdo desta página pode ajudar alguém? Compartilhe!