Для того, чтобы сделать BLOBFIELD именно в виде BITMAP нам обязательно необходимо

сохранить Bitmap в самом поле по имени dbase под названием Icon...

Потому что Icon являет собой именно двойственное Blob-поле.

В том случае, если Вы хотите купить шины киев, всегда это можно сделать в интернет-магазине ZAKAZSHIN.COM.UA!

Вот представленный пример кода:

procedure ....

var IconStream : TMemoryStream;

..

..

begin

.

.

IconStream := TMemoryStream.Create;

Image1.picture.icon.savetostream(IconStream);

(Table1.fieldbyname('Icon') as TBlobField).LoadFromStream(IconStream);

Table1.post;

IconStream.Free;

.

.

end;

А далее, продолжая, ставим Bitmap именнов Timage из самого поля под названием dbase только с именем Icon.

procedure .....

var IconStream : TMemoryStream;

..

..

begin

.

.

IconStream := TMemoryStream.Create;

(Table1.fieldbyname('Icon') as TBlobField).SaveToStream(IconStream);

{именно для того, что бы правильно записать, надобно поставить позицию самого потока в «0»}

IconStream.Position := 0;

appointment.iconimage.picture.icon.loadfromstream(iconstream);

IconStream.Free;

end;

Мы имеем надежду, что информация, которая написанная выше, может Вам сослужить хорошую службу, потому как найти такую информацию именно в справочной системе по данной тематике фактически нереально.

С целью того, чтобы все это мочь сделать, мы попробовали великое множество самых различных методик. Мы даже пробовали работать с TBlobField, а также TBlobStream, но все таки они нне помогли нам докопатся до решения данной задачи (возможно такое еще и через недостаточное осведомление от разработчика Borland?).

Желаю Вам успеха в программировании!