Создание битового образа, содержащего текст

Функция GetBitmapFont в программе GRAFMENU в качестве параметра получает значения 0, 1 или 2, а возвращает описатель битового образа. В этом битовом образе содержится строка "Courier New", "Arial" или "Times New Roman", нарисованная соответствующим шрифтом, почти вдвое большим обычного системного шрифта. Рассмотрим, как работает функция GetBitmapFont. (Приводимый далее код не полностью соответствует коду из файла GRAFMENU.С. Для простоты ссылки на массив szFaceName заменены соответствующими значениями для шрифта Arial.)

Первым шагом должно быть определение размера системного шрифта с помощью структуры TEXTMETRIC:

hdc = CreateIC ("DISPLAY", NULL, NULL, NULL) ;

GetTextMetrics (hdc, &tm) ;

Чтобы сделать больший размер логического шрифта "Arial", необходимо увеличить некоторые значения, полученные из структуры TEXTMETRIC:

lf.lfHeight = 2 * tm.tmHeight ;

strcpy ((char *) lf.lfFaceName, "Arial") ;

Следующим шагом должно быть получение контекста устройства для экрана и создание совместимого с экраном контекста памяти:

hdcMem = CreateCompatibleDC (hdc) ;

Описателем контекста памяти является hdcMem. На следующем шаге создается шрифт на основе модифицированной структуры lf, и этот шрифт выбирается в контекст памяти:

hFont = (HFONT) SelectObject (hdcMem, CreateFontIndirect (&lf)) ;

Теперь, когда вы записываете в контекст памяти какой-то текст, Windows будет использовать для этого шрифт TrueType Arial, выбранный в контекст устройства.

Но поверхность экрана, представляемая этим контекстом памяти, все еще монохромная и содержит один пиксель. Необходимо сделать битовый образ достаточно большим для вывода в него текста. Размеры текста можно получить с помощью функции GetTextExtentPoint, а с помощью функции CreateBitmap создать битовый образ на основе полученных размеров:

GetTextExtentPoint (hdcMem, "Arial", 5, &size) ;

hBitmap = CreateBitmap (size.cx, size.cy, 1, 1, NULL) ;

SelectObject (hdcMem, hBitmap) ;

Теперь контекст устройства имеет монохромную поверхность экрана размер которого точно соответствует размеру текста. Все, что теперь нужно сделать, это вписать туда текст. Вы уже видели эту функцию раньше:

TextOut (hdcMem, 0, 0, "Arial", 5) ;

Осталось только очистить память. Для этого с помощью функции SelectObject снова выбираем в контекст устройства системный шрифт (он имеет сохраненный нами описатель hFont) и удаляем описатель предыдущего шрифта, который возвращает функция SelectObject, т. е. описатель шрифта Arial:

DeleteObject (SelectObject (hdcMem, hFont)) ;

Теперь можно удалить оба контекста устройства:

DeleteDС (hdcMem) ;

DeleteDС (hdc) ;

У нас остался битовый образ, в котором имеется текст "Arial", написанный шрифтом Arial.

Масштабирование битовых образов

Контекст памяти также выручает при необходимости масштабирования шрифтов для дисплеев с другой разрешающей способностью или коэффициентом сжатия. В программе GRAFMENU создаются четыре битовых образа, для коррекции размеров при выводе на экран, который имеет системный шрифт высотой 8 пикселей и шириной 4 пикселя. Для других размеров системного шрифта битовые образы должны быть растянуты. В программе GRAFMENU это делается с помощью функции StretchBitmap.

Первым шагом должно стать получение контекста устройства для экрана, получение размеров системного шрифта и создание двух контекстов памяти:

hdc = CreateIC ("DISPLAY", NULL, NULL, NULL) ;

GetTextMetrics (hdc, &tm) ;

hdcMem1 = CreateCompatibleDC (hdc) ;

hdcMem2 = CreateCompatibleDC (hdc) ;

DeleteDС (hdc) ;

Описателем битового образа, который передается функции, является hBitmap1. С помощью функции GetObject программа может получить размеры этого битового образа:

GetObject (hBitmap1, sizeof(BITMAP), (PSTR) &bm1) ;

Таким образом размеры копируются в структуру bm1 типа BITMAP. Структура bm2 устанавливается равной bm1, а затем на основе размеров системного шрифта некоторые размеры в этой структуре модифицируются:

bm2 = bm1;

bm2.bmWidth = (tm.tmAveCharWidth * bm2.bmWidth) / 4 ;

bm2.bmHeight = (tm.tmHeigth * bm2.bmHeight) / 8 ;

bm2.bmWidthBytes = ((bm2.bmWidth + 15) / 16) * 2 ;

Теперь, на основе измененных размеров, можно создать новый битовый образ с описателем hBitmap2 :

hBitmap2 = CreateBitmapIndirect (&bm2) ;

Затем, в двух контекстах памяти можно выбрать эти два битовых образа:

SelectObject (hdcMem1 hBitmap1) ;

SelectObject (hdcMem2, hBitmap2) ;

Необходимо скопировать первый битовый образ во второй и увеличить его. Это требует вызова функции StretchBlt :

StretchBlt (hdcMem2, 0, 0, bm2.bmWidth, bm2.bmHeight,

hdcMem1, 0, 0, bm1.bmWidth, bm1.bmHeight, SRCCOPY) ;

Теперь второй битовый образ правильно промасштабирован. Он будет использоваться в меню. Очистка делается просто:

DeleteDС (hdcMem1) ;

DeleteDС (hdcMem2) ;

DeleteDС (hBitmap1) ;