Вниз
Скачать: 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.014 c
1-89363
PlaZZma
2003-10-16 06:06
2003.10.27
TStringGrid и обновление ячеек


1-89234
Egor
2003-10-14 17:48
2003.10.27
Delphi && Microsoft Word


1-89261
AlexanderSK
2003-10-14 17:29
2003.10.27
Как сохранить строку в TFileStrem


1-89387
denmin
2003-10-15 16:20
2003.10.27
Delphi5 в Win2k проблема


14-89490
panov
2003-10-09 17:20
2003.10.27
Создание топиков, обращенных к определенному участнику форума




   Наверх