В чем ошибка?

← →
Sairex © (2008-01-23 15:35) [0]

Вообщем сделал процедурку для добавления картинки в базу.
Но когда я сохраняю из TImage картинку вылезает ошибка
"BLOB not opened". Что я делаю не так?
procedure TF1.ToolButton2Click(Sender: TObject); Var F:String; Tb:TBlobStream; TS:TStream; begin if F1.Tab1.Active then Begin Tab1.Insert; try Tb:=TBlobStream.Create((Tab1.FieldbyName("Graph") as TBlobField),bmreadwrite); try Image1.Picture.Bitmap.SaveToStream(tb); Tab1.Post; finally Tb.Free; end; Finally end; //try End;

← →
Sairex © (2008-01-23 16:23) [1]

Ребят может кто нить ответит?

← →
Правильный_Вася (2008-01-23 16:30) [2]

> TBlobStream.Create

дурость
используй Dataset.CreateBlobStream

← →
Sairex © (2008-01-23 16:58) [3]

> Правильный_Вася (23.01.08 16:30) [2]
>
>
> > TBlobStream.Create
>
> дурость
> используй Dataset.CreateBlobStream
>

Почему дурость?
Я не могу использовать DataSet, поскольку прога будет на съемном насителе и постоянно будет использоваться на разных компах.

← →
Правильный_Вася (2008-01-23 17:40) [4]

> Я не могу использовать DataSet, поскольку прога будет на
> съемном насителе и постоянно будет использоваться на разных
> компах.

а через что ты собираешься запихивать данные в БД? клизмой?

Хммм... незнаю каким чудом у меня все работает на абсолютно чистой винде.
На форме только Table1, Image1, DataSource, DBLookupListBox. Правда я в папку с прогой кинул парочку длл и все.

← →
Правильны_Вася (2008-01-23 18:48) [6]

> На форме только Table1

значит, нужен БДЕ, а это ~10-15 метров

кстати, CreateBlobStream к БДЕ отношения не имеет
а TTable - наслединк TDataset

учи матчасть

В чем ошибка? Найти похожие ветки