ImageShow

← →
*pavel (2004-04-02 13:57) [0]

Как в ImageShow загрузить bitmap из ресурса

← →
Delphi5.01 © (2004-04-03 21:46) [1]

Delaetsa eto takje kak i v vcl, no ia lublu ispolzovat BitBlt, eta funkcia doiot skorost pochti ravnuiu DirectX-u.

var BitMap: PBitMap;
begin
BitMap:=NewBitMap(0,0);
BitMap.LoadFromResourceName(HInstance,"MYPICSNAME");
BitBlt(form1.ImageShow1.Canvas.Handle,
0,0,form1.ImageShow1.Width,form1.ImageShow1.Height,
BitMap.Canvas.Handle,
0,0,SRCCOPY);
BitMap.Free;
end;

jelau udachi!

ImageShow Найти похожие ветки