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

Вниз

Как правильно выбирать шрифты для рисования...   Найти похожие ветки 

 
max999   (2006-04-18 10:36) [0]

...на (или по) DC?

на WM_PAINT пишу:

 FontNormal := CreateFont(-8, 0, 0, 0, FW_DONTCARE, 0, 0, 0, ANSI_CHARSET, OUT_TT_PRECIS, CLIP_DEFAULT_PRECIS, ANTIALIASED_QUALITY, FF_DONTCARE + DEFAULT_PITCH, DefFontName);
 FontBold := CreateFont(-8, 0, 0, 0, FW_BOLD, 0, 0, 0, ANSI_CHARSET, OUT_TT_PRECIS, CLIP_DEFAULT_PRECIS, ANTIALIASED_QUALITY, FF_DONTCARE + DEFAULT_PITCH, DefFontName);
 FontItalic := CreateFont(-8, 0, 0, 0, FW_DONTCARE, 1, 0, 0, ANSI_CHARSET, OUT_TT_PRECIS, CLIP_DEFAULT_PRECIS, ANTIALIASED_QUALITY, FF_DONTCARE + DEFAULT_PITCH, DefFontName);
 FontBoldItalic := CreateFont(-8, 0, 0, 0, FW_BOLD, 1, 0, 0, ANSI_CHARSET, OUT_TT_PRECIS, CLIP_DEFAULT_PRECIS, ANTIALIASED_QUALITY, FF_DONTCARE + DEFAULT_PITCH, DefFontName);

// само рисование -
 SelectObject(hdc, FontNormal);
 TextOut(hdc, 0, 0, "22", 2);
 DeleteObject(FontNormal);
 
 SelectObject(hdc, FontBold);
 TextOut(hdc, 0, 20, "22", 2);
 DeleteObject(FontBold);

 SelectObject(hdc, FontNormal);
 TextOut(hdc, 0, 40, "22", 2);
 DeleteObject(FontNormal);

По идее вначале должен рисоваться нормальный текст, потом полужирный, потом снова нормальный... Но последние "двойки" рисуються полужирным...


 
MBo ©   (2006-04-18 11:49) [1]

> DeleteObject(FontNormal);
Все, копец нормальному...


 
max999   (2006-04-18 11:54) [2]

Уже сам разобрался :) Но все равно спасибо...


 
Zz_   (2006-04-18 13:06) [3]

А зачем на WM_PAINT писать

CreateFont +  DeleteObject

Не лучше ли один раз CreateFont и один раз DeleteObject
в соответствующих местах, но никак не на WM_PAINT ?



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

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

Наверх




Память: 0.47 MB
Время: 0.049 c
2-1152789449
alexandrine
2006-07-13 15:17
2006.08.06
Need help


1-1150978339
Bundeskanzler
2006-06-22 16:12
2006.08.06
Поиск в TListView


1-1151182022
AlexeyT
2006-06-25 00:47
2006.08.06
TImage: баг с иконками большими 32х32


15-1152452599
AlexanderMS
2006-07-09 17:43
2006.08.06
"Мигающее" модальное окно.


3-1149152464
RomanH
2006-06-01 13:01
2006.08.06
Параметризированные запросы IBQuery