Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.07;
Скачать: CL | DM;

Вниз

HBitmap   Найти похожие ветки 

 
lds78   (2002-09-24 09:51) [0]

Исходный код:
------------------------------------
MainDC:=GetDC(wnd);
GetClientRect(wnd,r);
ClockDC:=CreateCompatibleDC(MainDC);
ClockBM:=CreateCompatibleBitmap(MainDC,r.Right,r.Bottom);
SelectObject(ClockDC,ClockBM);
br:=CreateSolidBrush(rgb(0,128,192));
FillRect(ClockDC,r,br);
DeleteObject(br);
br:=CreateSolidBrush(rgb(0,0,0));
FrameRect(ClockDC,r,br);
DeleteObject(br);
SetPixel(ClockDC,4,4,rgb(0,0,0));
BitBlt(MainDC,0,0,r.Right-r.Left,r.Bottom-r.Top,ClockDC,0,0,srccopy);
DeleteObject(ClockBM);
DeleteDC(ClockDC);
ReleaseDC(wnd,MainDC)
------------------------------------
Вопрос: почему под Win9x/ME через короткий промежуток времени перестает отображаться графика. Под Win2K/XP все ОК.


 
Evgeny ©   (2002-09-24 11:18) [1]

Попробуй так:
OldBm := SelectObject(ClockDC, ClockBM);
...
DeleteObject(SelectObject(ClockDC, OldBM););
DeleteDC(ClockDC);
ReleaseDC(wnd, MainDC)




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

Текущий архив: 2002.11.07;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.012 c
14-21774
Romych
2002-10-17 23:54
2002.11.07
DeDe программа для дизассемблирования


14-21820
Forever
2002-10-20 21:59
2002.11.07
Как возвести в квадрат методом рекурсии ?


1-21646
^Sanya
2002-10-27 15:39
2002.11.07
Проверка объкта


14-21738
vopros
2002-10-18 10:38
2002.11.07
Кто смотрел спектакль?


1-21657
Dim_460
2002-10-27 16:07
2002.11.07
Загрузка рисунка c URL средствами Delphi