Insertar imagen en campo blob mediante SQL

[subzero]

Hola amigo, prueba con esto quizas te sea de apoyo

*****
with query do
begin
close;
sql.clear;
sql.Add('UPDATE NOMBRE_TABLA');
sql.Add('SET CAMPO_FOTO = :fto');
sql.Add('WHERE CODIGO = :vlr');
ParamByName('vlr').AsString := '' + codigo_planta + '';
ParamByName('fto').LoadFromFile(OPDFoto.FileName, ftBlob);
ExecSQL;
end;

*****

Esto lo hago desde delphi 7...