Error al cerrarse OpenPictureDialog

[Minio]

Hola dec,

Bueno he resuelto ese problema, bueno le he esquibado. El tema es que yo intentaba vaciar la imagen del DBImage con un Free, y al parecer eso daba problemas al intentar despues hacer el LoadFromFile con el OpenPictureDialog.FileName ya que no apunta a ningun sitio. Bueno ahora lo que pretendo es vaciar la imagen del DBImage a mi gusto si petar la aplicación.

Bueno aqui tienes el código:

Código Delphi [-]
procedure TFmArticulos.DBIFotoDblClick(Sender: TObject);
begin
  if OpenPictureDialog1.Execute then
    begin
      DBIFoto.Picture.LoadFromFile(OpenPictureDialog1.FileName);
      DMGestion.TArticulosImagen.Value := OpenPictureDialog1.FileName
    end
  else
    OpenPictureDialog1.FileName := EmptyStr;
    //Aqui es donde tenia el problema (DBIFoto.Picture.Free
end;

De momento no he tenido problemas con el tipo de imagenes.

Pues esto es lo que me ocurre....gracias por tu ayuda