Определение типа используемого шрифта

Советы » Шрифты » Определение типа используемого шрифта

Данная функция возвращает значение True, если в системе установлен мелкий шрифт, или же, False - если крупный.


function

SmallFonts: boolean; var

DC: HDC;
begin


DC:=GetDC(0);
Result:=(GetDeviceCaps(DC, LOGPIXELSX) = 96); {Для крупного - 120
Для мелкого - 96}
ReleaseDC(0, DC);
end

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com