| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

ImageShow [Delphi]

*pavel ©   (2004-04-02 13:57:00) 

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

---

Delphi5.01   (2004-04-03 21:46:00) [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!

---

Наверх