[JcN]

Delphi+Ado+Access
Проблема банальная. Когда загружаю катритку через Table:

Код:

if OpenD1.Execute then
begin
ADOTable1.Edit;
AdoTable1Foto.LoadfromFile(OpenD1.FileName);
AdoTable1.Post;
end;

всё прекрасно работает.
Но вот не получается загрузить через Query.

Код:

 { DataModule2.Query.Close;
  DataModule2.Query.sql.Clear;
  DataModule2.Query.sql.Add('Update Tovar set Foto=:f  Where IDtovar=:t');
 DataModule2.Query.Parameters.ParamByName('t').Value:= Strtoint (DBEdit4.Text);
 DataModule2.Query.Parameters.ParamByName('f').LoadFromFile(OpenD1.FileName);
  DataModule2.Query.ExecSQL;

подскажите как решить вопрос
Спасибо