Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];




Вниз

Как узнать, крупный или мелкий экранный шрифт установлен в системе? 


Aleksandr   (2001-12-28 11:08) [0]

Проблема чисто оформительская: программа при сборке в моем разрешении 1024х768 и мелким экранным шрифтом имеет один вид у окон, а вот при смене шрифта или разрешения - совсем другой. Ну, с разрешением проще - использовать ScaleBy, а вот как быть, когда отличается не разрешение, а размер шрифта, и как это узнать?



gek   (2001-12-28 11:15) [1]

Используй шрифты TrueType



Aleksandr   (2001-12-28 11:41) [2]

Это породит кучу новых проблем: контроль за шрифтом и т.д...
Насколько я понимаю, для этого существуют у формы проперти Scaled и PixelsPerInch, только вот как оперировать последним?..



Dimka Maslov   (2001-12-28 13:12) [3]

Screen.PixelsPerInch = 96: нормальный шрифт
Screen.PixelsPerInch = 120: крупный.

Другие значения: юзер - придурок.



gek   (2001-12-28 13:47) [4]

Dimka Maslov прав



Aleksandr   (2001-12-28 19:21) [5]

Коллеги, энто усе прекрасно, но не работает :(...
Пытался я по-простому:
MainForm.Scaled:=true;
MainForm.PixelsPerInch:=96...
И фиг...



Anatoly Podgoretsky   (2001-12-28 23:11) [6]

Э коллега, ты просил как узнать, а не как установить, так бы и спрашивал, что установить нельзя, только читать




Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.03 c
7-330             SArthur               2001-12-29 09:20  2002.04.01  
Win 9x, камни AMD и матери на VIA... Где собака роется ?


1-236             SlavaLamer            2002-03-20 19:48  2002.04.01  
Реестр


3-26              Санька                2002-03-05 13:28  2002.04.01  
Господа, помогите с чтением данных из Excel


3-12              Basile                2002-02-27 20:30  2002.04.01  
Компоненты для доступа к MSSQL Server?


1-221             greenrul              2002-03-19 21:24  2002.04.01  
Как строковое значение клавиши перегнать в её VirtualKeyCode значение (integer)