Eu uso DbExpress
with SqlDataset1 do
   begin
   close;
   commandtext:= 'INSERT INTO FOTOS (ID_CLI, FOTO) VALUES (:ID_CLI, :FOTO)';
   ParamByName('ID_CLI').asinteger:= 1;
   parambyname('FOTO').LoadFromFile(extractfilepath(application.exename) + 
'IMAGEM.JPG', ftBlob);
   ExecSQL;
   end;
Deus abençõe a todos !!!