[JcN]

получилось!
Может кому пригодится
Запрос

Код:

Update Tovar
set Foto=:f
Where IDtovar=:T

Указал в свойстве параметра "f" тип ftblob
и потом:

Код:

if OpenPD3.Execute then
 begin
  DataModule2.UFoto.Close;
 DataModule2.UFoto.Parameters.ParamByName('T').Value:= Strtoint (DBEdit4.Text);
 DataModule2.UFoto.Parameters.ParamByName('f').LoadFromFile(OpenPD3.FileName,ftblob);
  DataModule2.UFoto.ExecSQL;