Imagenes en Campos Blob

[subzero]

Tengo un nuevo problema... cuando cargo la imagen que se encuentra almacenada se me presentan errores como #53, #43, no se si el error este ligado al momento de guardarla o de cargarla para una mejor descripción expongo el método que empleo

Almacenamiento
with ModuloDatos.IBQuery do
begin
close;
sql.clear;
sql.Add('UPDATE IMAGE');
sql.Add('SET FOTO = :fto');
sql.Add('WHERE CODIGO = :vlr');
ParamByName('vlr').AsString := '' + codigo + '';
ParamByName('fto').LoadFromFile(OPDFoto.FileName, ftBlob);
ExecSQL;
end;

Gracias por intersarse en mi duda