Вниз
Скачать: CL | DM;

Как задать фонту св-во Bold?   Найти похожие ветки 

← →
cvg   (2005-02-04 08:21) [0]

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

Label26.Caption.Font.Style := fsBold;

В ответ компилатор меня обматерил. Что я написал не так?


← →
КаПиБаРа ©   (2005-02-04 08:24) [1]

На будущее. Там окошко выводится и краткое описание ошибки. Читай.


← →
Александр Иванов ©   (2005-02-04 08:27) [2]

cvg   (04.02.05 8:21)
Label26.Font.Style := fsBold;


← →
cvg   (2005-02-04 08:27) [3]

Ну, "record, object, or class type required". И в каком месте это все требуется?


← →
cvg   (2005-02-04 08:30) [4]

Ответ тов. Иванову: Incompatible types: "TFontStyles" and "TFontStyle"...


← →
Александр Иванов ©   (2005-02-04 08:34) [5]

cvg   (04.02.05 8:30) [4]
Да, конечно, только проснулся.
Label26.Font.Style := Label26.Font.Style+ [fsBold];


← →
КаПиБаРа ©   (2005-02-04 08:39) [6]

cvg   (04.02.05 8:27) [3]
В том месте на которое курсор указывает.


← →
cvg   (2005-02-04 08:39) [7]

Thanks. Компилятор уже не ругается, а как оно работать в деле будет -- ща пороверю!


← →
cvg   (2005-02-04 08:40) [8]

Это я тов. Иванову отвечал...


← →
cvg   (2005-02-04 09:56) [9]

А как сейчас убрать Bold? То есть, по идее должно быть что-то типа:

if {уcловие}
then Label26.Font.Style := Label26.Font.Style+[fsBold]
else ??????;


← →
Александр Иванов ©   (2005-02-04 09:58) [10]

:) Обратным действием к (+) является минус (-)
Label26.Font.Style := Label26.Font.Style-[fsBold]
Множества однако.


← →
cvg   (2005-02-04 10:02) [11]

Ну ты и гений, однако! Many thanks!



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.025 c
3-1105635701
Alex_V
2005-01-13 20:01
2005.02.20
Экспорт в форматированный текст


4-1104759069
Сергей+
2005-01-03 16:31
2005.02.20
Инвертирование цвета


14-1107201670
Ломброзо
2005-01-31 23:01
2005.02.20
+1!


3-1106489170
Mamed
2005-01-23 17:06
2005.02.20
TQRCompositeReport


14-1107272287
PIF
2005-02-01 18:38
2005.02.20
помогите разобраться с NetBios




   Наверх