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

Вниз

Свойство Style TFont   Найти похожие ветки 

 
anod ©   (2002-04-20 11:02) [0]

Я записываю свойства шрифта в ини или реестр. Как мне быть со Style. Мне пришла тут идея:
if [fsBold] in form1.font.style then reg.writebool("FBold",true);
А при загрузке if reg.ReadBool("FBold") then form1.font.style:=form1.font.style+[fsbold];


А нельзя ли покороче, записать и считать за 1 раз.


 
Набережных С.   (2002-04-20 19:30) [1]

Да, пожалуй, можно:

FS:TFontStyles;

reg.WriteInteger("Style",Byte(Font.Style));

Byte(FS):=reg.ReadInteger("Style");
Font.Style:=FS;



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

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

Наверх




Память: 0.46 MB
Время: 0.011 c
3-2492
Dmitry V. Averuanov
2002-04-08 18:33
2002.05.02
Нужно


1-2535
Delph
2002-04-18 16:54
2002.05.02
Вопрос про событие OnClick и OnDblClick


3-2468
Reef
2002-04-11 06:25
2002.05.02
Delphi5 + IB6 + русский язык


1-2536
55555
2002-04-18 11:12
2002.05.02
форма


7-2686
Andrey007
2002-02-05 10:56
2002.05.02
Можно ли программно изменить величину системного шрифта, и если да, то как?