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;
подскажите как решить вопрос
Спасибо