Вот только зачем вы еще это делаете?:
Код:
if not FileExists(OpenDialog1.FileName) then begin
ShowMessage('Файл с заданным именем не найден. Действие отменено.');
Exit;
end;
Там-же идет проверка
Код:
if not OpenDialog1.Execute then Exit;
которая гарантирует, что файл выбран и соответственно существует.