Показать сообщение отдельно
  #1  
Старый 10.09.2010, 16:34
Аватар для Моклев
Моклев Моклев вне форума
Новичок
 
Регистрация: 27.02.2009
Адрес: Лен. обл., г. Коммунар
Сообщения: 53
Версия Delphi: 7 и 2010
Репутация: 16
По умолчанию проблема с BitBlt

прочитал на форуме, что BitBlt - это самый быстрый способ переноса изображения на канву
только что-то он у меня не работает...
ситуация такая: Image1, var bm: TBitmap;

рисую на битмапе, хочу перенести на канву Image:

Код:
BitBlt(Image1.Canvas.Handle,0,0,bm.Width,bm.Height,bm.Canvas.Handle,0,0,SrcCopy);

прорисовка происходит много раз, так первый раз BitBlt прорисовывает, а затем нет. Если кто знает, напишите
Ответить с цитированием