Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 19.05.2009, 15:03
JcN JcN вне форума
Прохожий
 
Регистрация: 27.04.2009
Сообщения: 35
Репутация: 10
По умолчанию Picture и Query

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;
подскажите как решить вопрос
Спасибо
Ответить с цитированием
  #2  
Старый 19.05.2009, 15:51
Аватар для TOJluK
TOJluK TOJluK вне форума
Местный
 
Регистрация: 25.02.2009
Адрес: Минск
Сообщения: 551
Версия Delphi: 2007
Репутация: 110
По умолчанию

По- моему так должно быть:
Код:
DataModule2.Query.ParamByName('f').LoadFromFile(OpenD1.FileName, ftBlob);
Ответить с цитированием
  #3  
Старый 20.05.2009, 00:24
JcN JcN вне форума
Прохожий
 
Регистрация: 27.04.2009
Сообщения: 35
Репутация: 10
По умолчанию

получилось!
Может кому пригодится
Запрос
Код:
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;
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 18:29.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter