Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

wm_PAINT


ks ©   (2004-11-16 17:56:00) 

Правельно ли я работаю с рисованием,все рисуется
нет ли здесь утечки памяти
wm_PAINT:

hdc := BeginPaint(hWnd, PaintStruct);
SelectObject(hdc,hFont);
SetTextColor(hdc,1886);
SetBkColor(hdc,97);
TextOut(hdc,0,0,'keys:',5);
EndPaint(hWnd, PaintStruct);


ks   (2004-11-16 19:25:00) [1]

у меня font не меняется,но нем не менее его
надо каждый раз выбирать,а то левый по умолчанию
использоватся будет

dc тоже не меняется
в начале сделано dc:=GetDc(hwnd);
и только размеры меняются,но ведь dc от этого не зависит


Игорь Шевченко   (2004-11-16 18:25:00) [2]


> нет ли здесь утечки памяти


Зависит от DC.

Канонический способ:

var
 OldFont: HFONT;
....
OldFont := SelectObject(hdc,hFont);
SetTextColor(hdc,1886);
SetBkColor(hdc,97);
TextOut(hdc,0,0,'keys:',5);
SelectObject(hdc, OldFont);
.....


Наверх

Титульная страница Поиск, карта сайта Написать письмо