Si sustituyes la frase:
Código Delphi
[-]Dialogs.MessageDlg('¡ No existe foto de esta persona !', mtWarning, [mbOk], 0);
por
El mensaje no aparecerá y no te dará la excepción por la que preguntaste, si es que así lo deseas.
Es sólo una opción, ya que a muchos no le gusta que aparezcan mensajes que requieren la intervención del usuario.
Saludos