Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

BLOB(JPEG)->Interbase [IB6.x, MySQL]


anpv ©   (2003-05-06 09:10:00) 

Привет!
Подскажите как записать JPEG в BLOB поле БД Interbase (MySQL), чтобы это удовлетворяло следующим условиям:

1) JPEG создается, а не читается с диска
2) БД Interbase (MySQL) удаленная, находится на другом хосте
3) Быстрота передачи JPEG"a (т.е. что лучше использовать: таблицу или SQL-запрос)
4) Передача JPEG"a в БД осуществляется периодически с частотой 1 раз в секунду
5) Быстрота передачи JPEG"a (т.е. куда быстрее запишется BLOB: Interbase или MySQL)

Я использовал следующий код:
param ftBlob

var
j:TJpegImage;
...
procedure Timer1.Timer1Timer(...)
...
IBQuery.Close;
...
IBQuery1.SQL.Add("INSERT INTO table (col) VALUES (:param)");
IBQuery1.ParamByName("param").Assign(j); <- Ошибка
IBQuery.ExecSQL;
...

Как присвоить параметру типа BLOB картинку типа JPEG и только JPEG но не bitmap изза большего размера, т.е. как обойти вышеописанную ошибку?


Sergey Masloff   (2003-05-06 09:25:00) [1]

IBQuery1.ParamByName("param").LoadFromStream(Stream)

Естественно, поток (TStream) нужно сначала создать и загрузить в него JPEG


Наверх

Титульная страница Поиск, карта сайта Написать письмо