Вниз
Скачать: CL | DM;

Своё, что то типа DoubleBuffered   Найти похожие ветки 

← →
Chlavik ©   (2003-10-16 19:14) [0]

Привет... Как мне как можно быстрее нарисовать окно на моём битмапе, а потом уже на самом окне? Пробовал как в исходнике Controls ( TwinControl.WMPaint) но у меня не получается, воопервых постоянно RangeCheck Error выскаивает при Perfom(wm_EareBackGround....) (DC выходит за пределы Integer)) интересно что мой исходник копия того.. Кто посоветует как сделать правильно?


← →
clickmaker ©   (2003-10-16 19:24) [1]

Общая идея такова:

// Обработчик WM_PAINT

DC := BeginPaint(Handle, ps);
Bitmap := CreateCompatibleBitmap(DC, Width, Height);
MemDC := CreateCompatibleDC(DC);
OldBitmap := SelectObject(MemDC, Bitmap);
// рисуешь на MemDC

BitBlt(DC, Left, Top, Width, Height, Canvas.Handle, 0, 0, SRCCOPY);
SelectObject(MemDC, OldBitmap);
DeleteDC(MemDC);
DeleteObject(Bitmap);
EndPaint(Handle, ps);


← →
clickmaker ©   (2003-10-16 19:25) [2]

Сорри,

BitBlt(DC, Left, Top, Width, Height, MemDC, 0, 0, SRCCOPY);



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.019 c
1-89358
Eagle Owl
2003-10-15 12:59
2003.10.27
Сервисное приложение


3-89123
Vagrant
2003-10-07 05:06
2003.10.27
FIBDataSet и CahedUpdates


6-89421
Predator
2003-08-29 21:24
2003.10.27
Звук по сети


3-89168
SB
2003-10-06 08:04
2003.10.27
Delphi 6 и Office XP (по крайней мере Excel)! Не работает!


1-89378
satron
2003-10-15 18:08
2003.10.27
Кодовая страница в RichEdit




   Наверх