Indentificar q não existe uma foto na pasta especificada

Bom dia pessoal,Criei um cadastro de clientes que tem a opção de incluir foto, ele faz o seguinte, quando começo a preencher o cadastro coloco nome etc, ai clico para inserir a foto e salvo ela, até ai tudo bem, depois pesquiso o cliente e ele abre a foto correspondente que foi salva com o nome do cliente .jpg na pasta fotos clientes. Esta parte esta correto, mas se o cliente não tem foto na pasta ele diz q não foi possivel achar o arquivo. e se eu editar e colocar a foto fica tudo normal novamente. Então o que preciso é que quando ele ver q não tem foto na pasta ele apenas coloque o logo da empresa no timage. em vez de me dar a mensagem, segue abaixo o código.

procedure Tfrmcadcliente.BitBtn2Click(Sender: TObject);begin//Abre a o Meus documentos para inserir a fotoOpenPictureDialog1.Execute;Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);Image1.Stretch:=true;//Salva a imagem com o Nome do cliente no formato .JPGSavePictureDialog1.Execute;SavePictureDialog1.FileName:=dbedit3.Text+('.jpg');Image1.Picture.SaveToFile(SavePictureDialog1.FileName);end;

Dados da identificação da imagem.

procedure Tfrmcadcliente.DBGrid1DblClick(Sender: TObject);varfoto:string;semfoto:string;begin//ROTINA PARA IDENTIFICAÇÃO DA FOTO DO CLIENTE PESSOA FÍSICAfoto:=('C:\DPaula\fotosclientes\')+dbedit3.Text+('.jpg');OpenPictureDialog1.FileName:=foto;//--TENTEI DESTE MODO DIZER SE NÃO ENCONTRAR A FOTO COLOCAR O LOGO MAS NÃO DA CERTOif OpenPictureDialog1.FileName<>foto thenbeginImage1.Picture.LoadFromFile('C:\DPaula\img\logotipo.jpg');Image1.Stretch:=true;end;if OpenPictureDialog1.FileName<>(dbedit3.text) thenbeginImage1.Picture.LoadFromFile('C:\DPaula\img\logotipo.jpg');Image1.Stretch:=true;end;//-------------------------------------------------//ESTA PARTE FUNCIONA if OpenPictureDialog1.FileName=foto thenbeginImage1.Picture.LoadFromFile(OpenPictureDialog1.FileName);Image1.Stretch:=true;end;dbgrid1.Visible:=false;end;

E também gostaria de saber se tem como fazer essa rotina abrir GIF em vez de JPG, Obrigado pela atençao de todos ate agoraUm grande abraçoSergio Martins