[angvelem]

А так разве недостаточно?

Код:

procedure TForm1.LoadAva(ImageName : String; Image : TImage);
begin
  if FileExists(Serverdir+imageName+'.bmp') then
    Image.Picture.LoadFromFile(Serverdir+imageName+'.bmp')
  else if FileExists(Serverdir+'DefaultAvatar.bmp') then
    Image.LoadFromFile(Serverdir+'DefaultAvatar.bmp');
end;