Hola oh.mely, bienvenida a los foros de
Club Delphi
Si el formato guardado es un .jpg válido, inténtalo de este modo:
Código Delphi
[-]
...
uses Jpeg;
procedure TuForm.BitBtn1Click(Sender: TObject);
var
J: TJPEGImage;
begin
Image1.Picture := nil;
J := TJPEGImage.Create;
try
J.Assign(TBlobField(Query.FieldByName('IMAGEN')));
imgFoto.Picture.Assign(J);
finally
J.Free;
end;
end;
Saludos