
04.03.2010, 18:17
|
 |
Местный
|
|
Регистрация: 25.02.2009
Адрес: Минск
Сообщения: 551
Версия Delphi: 2007
Репутация: 110
|
|
Так надо:
Код:
var
Bmp: TBitmap;
BS: TADOBlobStream;
begin
BS:= TADOBlobStream.Create(FIELВ_NAME, bmRead);
Bmp:= TBitmap.Create;
Bmp.LoadFromStream(BS);
DBImage1.Picture.Graphic:= Bmp;
Bmp.Free;
BS.Free;
|