Вниз
Скачать: CL | DM;

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


 
sniknik ©   (2004-11-05 17:09) [9]

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


 
sniknik ©   (2004-11-05 17:10) [10]

Mike Kouzmine ©   (05.11.04 17:09) [8]
что значит? есть расшифровка?


 
Mike Kouzmine ©   (2004-11-05 17:28) [11]

sniknik ©   (05.11.04 17:10) [10] А что тут расшифровывать? :) Разве не 82?


 
sniknik ©   (2004-11-05 17:41) [12]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.124 c
4-1098298181
Cheburek
2004-10-20 22:49
2004.12.05
Drag&amp;Drop элементов из проводника в моё приложение


14-1100679552
NewDelpher
2004-11-17 11:19
2004.12.05
Зачем нужна JAVA и надо ли на неё переходить?


14-1100534465
vasilii
2004-11-15 19:01
2004.12.05
profiler для Delphi7


1-1101063521
redlord
2004-11-21 21:58
2004.12.05
Tstringgrid и размер колонки


4-1098463382
Cheburek
2004-10-22 20:43
2004.12.05
Drag &amp; Drop имён файлов из моего приложения в проводник?




   Наверх