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

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

Как работать с типом BLOB Oracle8 через ODAC 4.05 в Delphi7 [D7]

Vitalik S. ©   (2003-04-05 12:18:00) 

Народ помогите, пожалуйста. Неполучается запихнуть картинку в Blob-поле. Демка, шо идет с ODACом, тоже не работает, выдает ошибку: "No Data found".

---

Vitalik S.   (2003-04-07 10:03:00) [1]

Спасибо большое, все получилось.

---

roottim   (2003-04-05 12:39:00) [2]

Хотябы приводил код!
вот один способ...
************
var qT: TSmartQuery;
vSm: TStream;
begin
qT := TSmartQuery.Create(Self);
vSm := TMemoryStram.Create;
try
***.SaveToStream(vSm);
vSm.Position := 0;
qT.Sql.Text := "SELECT T.*, T.ROWID FROM MYTABLE T WHERE KEY_ID = :P_ID";
qT.Params[0].Value := ...
qT.Open;
qT.Edit;
TBlobField( qT.FieldByName("MyBlobField") ).LoadFromStream(vSm);
qT.Post;
qT.Close;
finally
vSm.Free;
qT.Free;
end;
end;

---

Наверх