Cita:
Empezado por mamu
... y como sería eso? Mi forma esta mal?
|
Más o menos me refería a eso.
No vi tu respuesta.
Yo intentaría capturar el tipo concreto del error; Algo así:
Código Delphi
[-]try
Image1.Picture.Bitmap.LoadFromFile('C:\Temp\Readme.bmp');
except
on E:EInvalidGraphic do begin
MessageDlg('Archivo Dañado o no es un tipo de imagen reconocido.', mtError, [mbOK], 0);
Image1.Picture.Bitmap.LoadFromFile('c:\mi_imagen_para_el_error.jpg');
end;
on E:EFOpenError do begin
MessageDlg('El archivo de imagen no existe.', mtError, [mbOK], 0);
end
else begin
MessageDlg('Error desconocido', mtError, [mbOK], 0);
end;
end;