Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

BitBlt( form1.PaintBox1.Canvas.Handle ... [Delphi, Windows]

Delphi5.01 © (2004-03-21 19:56:00)
Здравствуйте!
Хочется найти аналог BitMap-а в КОЛ, у которого есть свойство Canvas.
В принципе мне нужно вывести изображение методом Draw, так как такого у BitMap не оказалось пришлось использовать API функцию BitBlt. Но у BitMap-а нет свойства Canvas, по этой причине я не могу его(BitMap) использовать в данной функции. Посоветуйте как решить проблему.

BitMap.LoadFromFile('pic.bmp');
BitBlt( form1.PaintBox1.Canvas.Handle,
0,0,BitMap.Width,BitMap.Height,
BitMap.????.Handle,
0,0,SRCCOPY);

П.С. Перевожу свой, очень хороший компонент на КОЛ. В нем часто используется BitMap, так как он был самим быстрым из аналогов в ВСЛ.

Delphi5.01 (2004-03-21 20:05:00) [1]
Извиняюсь, сам нашел вешение :-)

var BitMap: PBitMap;
begin
BitMap:=NewBitmap(0,0);
BitMap.LoadFromFile('pic.bmp');
BitBlt( form1.PaintBox1.Canvas.Handle,
0,0,BitMap.Width,BitMap.Height,
BitMap.Canvas.Handle,
0,0,SRCCOPY);
end;

Немного покопал глубже, круто сказал :-)
Надо было грубо прописать Canvas.Handle (хоть и компилятор не давал подсказки о существования этого свойства)

Наверх

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