[Моклев]

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

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

Код:

BitBlt(Image1.Canvas.Handle,0,0,bm.Width,bm.Height,bm.Canvas.Handle,0,0,SrcCopy);

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