Как настроить ClearType для оптимизации отображения текста в приложениях на Win32 API

Delphi , Синтаксис , Справочник по API-функциям

Введение

ClearType – это технология подхода к отображению текста, которая была разработана Microsoft для улучшения восприятия текста на экранах, имеющих высокую плотность пикселей. Она использует механизм антиалиасинга, который позволяет гладко отображать шрифты за счёт распределения пикселей. Однако, для приложений, использующих Win32 API для отрисовки текста на изображениях, настройки ClearType могут вносить нежелательные изменения в восприятие текста, особенно если итоговый результат не предназначен для отображения на экране. В этом руководстве мы рассмотрим, как можно установить более устойчивое поведение для отображения текста в вашем приложении.

Описание проблемы

Разработчик столкнулся с проблемой, что при отрисовке текста на изображениях в памяти, используя Win32 API, качества отображения текста зависят от локальных настроек ClearType, установленных на компьютере, на котором выполняется приложение. Это приводит к тому, что один и тот же текст может отображаться по-разному, что нежелательно для конечного продукта, который не предназначен для просмотра непосредственно на экране.

Пример кода

Базовый код на Delphi для отрисовки текста на изображении следующий:

var
   Canvas : tCanvas;
   Text : WideString;
   TextRect : tRect;
begin
   Canvas := Bitmap.Canvas;
   Canvas.Brush.Color := clBlack;
   Canvas.Pen.Color := clBlack;
   Canvas.Font.Name := 'Courier New';
   Canvas.Font.Size := 11;
   Canvas.Font.Color := clWhite;
   TextRect := ...;  // расчёт позиции текста
   DrawTextW(Canvas.Handle, PWideChar(Text), Length(Text), TextRect, DT_NOCLIP or DT_NOPREFIX or DT_SINGLELINE or DT_CENTER or DT_VCENTER);
end;

Решение проблемы

Чтобы обеспечить консистентность вывода, независимо от локальных настроек ClearType, можно воспользоваться следующим подходом: создание нового логического шрифта, который не использует ClearType. Для этого необходимо передать флаг NONANTIALIASED_QUALITY в качестве параметра fdwQuality при создании шрифта. Это позволит отключить технологию ClearType для отрисовки текста.

Пример изменения качества шрифта в Delphi

В Delphi для изменения качества шрифта можно использовать свойство Quality класса TFont. В зависимости от нужд, можно установить значение fqAntialiased (для старого стиля антиалиасинга без ClearType) или fqNonAntialiased (для полного отключения сглаживания). В более старых версиях Delphi, где свойство Quality недоступно, можно использовать функцию CreateFontIndirect с нужным значением качества.

procedure SetFontQuality(Font: TFont; Quality: Byte);
var
  LogFont: TLogFont;
begin
  if GetObject(Font.Handle, SizeOf(TLogFont), @LogFont) = 0 then
    RaiseLastOSError;
  LogFont.lfQuality := Quality;
  Font.Handle := CreateFontIndirect(LogFont);
end;

Вызов данной функции перед началом отрисовки текста позволит установить нужное качество шрифта.

Заключение

Настройка качества шрифта в приложениях на Win32 API позволяет достичь более предсказуемого и консистентного результата при отрисовке текста, что особенно важно для приложений, не предназначенных для отображения текста на экране. Используя описанные выше методы, разработчики могут контролировать процесс отрисовки текста и избегать зависимости от локальных настроек ClearType.

Создано по материалам из источника по ссылке.

Настройка ClearType для оптимизации отображения текста в приложениях на Win32 API с целью достижения консистентного и предсказуемого результата, независимо от локальных настроек пользователя.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Справочник по API-функциям ::