Как из бд вывести картинку в Image ?

← →
h1ma (2002-11-06 06:25) [0]

DBImage не предлагать ;)

постить в бд из Image научился, а вот обратно как-то немогу сообразить.

← →
Виталий Панасенко (2002-11-06 08:57) [1]

И куда, по вашему, ее можно вывести 8-0 ?

← →
legionary (2002-11-06 09:43) [2]

создаешь TBlobStream и TBitmap.
затем у bitmap вызываешь LoadFromStream

← →
h1ma (2002-11-06 11:33) [3]

> создаешь TBlobStream и TBitmap.

а по подробней можно пожалуйста.

← →
asmith (2002-11-06 13:17) [4]

var
szBMPName : string;
icon : TBitmap;
stream : TStream;
...
myQuery.SQL.Clear();
myQuery.SQL.Add("select Icon from ClassIcon where ID=1");
myQuery.Open();
icon := TBitmap.Create();
try
stream := TMemoryStream.Create();
(Fields[0] as TBlobField).SaveToStream(stream);
stream.Position := 0;
icon.LoadFromStream(stream);
myImage.Picture.Bitmap.Assign(icon);
finally
stream.Free();
icon.Free();
end;

Как из бд вывести картинку в Image ? Найти похожие ветки