Acces OLE Object and delphi image

← →
Mamed (2004-11-05 15:49) [0]

Kto skajet kak s accesovskoga mdb fayla vitasit bmp fayli s polya tipa OLE Object cherz delphi

← →
sniknik © (2004-11-05 16:05) [1]

смотря как его туда ложили, если как имедж из дельфей то без выкрутасов подключаеш dbimage и все, если как обьект (например в сам аксес перетащили с проводника в поле и "дропнули" (драг&дроп)) то посложнее, так примерно
procedure TForm1.ADODataSet1AfterScroll(DataSet: TDataSet); var Stream: TMemoryStream; begin Stream:= TMemoryStream.Create; try TBLOBField(ADODataSet1.FieldByName("ImField")).SaveToStream(Stream); if Stream.Size <> 0 then begin Stream.Position:= 82; {пропустить префикс обьекта} Image1.Picture.Bitmap.LoadFromStream(Stream); end; finally Stream.Free; end; end;

← →
Mamed (2004-11-05 16:30) [2]

Osibka snova naverno iz za Stream.Position:= 82
A chto oznachaet 82?

← →
sniknik © (2004-11-05 16:39) [3]

размер префикса если bmp добавлен как обьект
читай еще раз [1] > смотря как его туда ложили ...

← →
Mamed (2004-11-05 16:51) [4]

a gde mojna uznat eti cifri?

← →
sniknik © (2004-11-05 16:55) [5]

незнаю, может где и написано, я сам вычислял.

← →
Mamed (2004-11-05 16:58) [6]

togda mojno uznat kak vichislyaete)

← →
Mamed (2004-11-05 16:59) [7]

togda mojno uznat kak vichislyaete)

← →
Mike Kouzmine © (2004-11-05 17:09) [8]

1 + 2 + 3 + 76 = 82

записывал/читал в поле разными способами, сравнивал размеры/побайтно картинки в записи.
обычно в общем.
зачем тебе? размер префикса врядли изменится в ближайшем будущем, а его я тебе уже сказал.

а это шутка. я подумал было, что есть описание, что какой байт в префиксе значит.

Acces OLE Object and delphi image Найти похожие ветки