Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сохранение стиля шрифта в ini фаил [D7, WinXP]

Destroyer © (2005-07-22 22:30:00)
Надо сохранить настройки шрифта в ini фаил, чтобы потом их загрузить. Никак не получается сохранить стиль шрифта Font.style, т.к. это и не строковая переменная и не численная. Как мне это осуществить?

Mx (2005-07-23 00:38:00) [1]

> Destroyer © (22.07.05 23:15) [6]
> И еще, как называются смешанные стили, а то найти никак
> не могу

Никак не называются. TFontStyles - это набор, а не перечисляемый тип. Поэтому у тебя и был "Incompatible types". Вариант "Ученик"а безусловно лучше.

Destroyer (2005-07-22 23:22:00) [2]
Ученик, еще раз спасибо.

Ученик (2005-07-22 23:19:00) [3]
>Destroyer © (22.07.05 23:15) [6]
Font.Style := TFontStyles(Byte(ReadInteger('SectionName', 'KeyName', 0)));

Destroyer (2005-07-22 23:15:00) [4]
А как правильно загрузить? Так не получается:
if fontstyle=2 then Font.Style:=fsItalic;
if fontstyle=1 then Font.Style:=fsBold
...
И еще, как называются смешанные стили, а то найти никак не могу.

Destroyer (2005-07-22 22:49:00) [5]
Ученик, спасибо.

Mx (2005-07-22 22:49:00) [6]
Надо так:
if fsBold in Font.Style then
tmpfontstyle:='bold';
if fsItalic in Font.Style then
tmpfontstyle:='italic';
if fsUnderline in Font.Style then
tmpfontstyle:='underline';
if fsStrikeOut in Font.Style then
tmpfontstyle:='strikeout';

Destroyer (2005-07-22 22:44:00) [7]
Я пытаюсь так:
if Font.Style=fsBold then
tmpfontstyle:='bold';
if Font.Style=fsItalic then
tmpfontstyle:='italic';
if Font.Style=fsUnderline then
tmpfontstyle:='underline';
if Font.Style=fsStrikeOut then
tmpfontstyle:='strikeout';
Получается ошибка Incompatible types. Как вообще узнать какой стиль у данного шрифта?

Ученик (2005-07-22 22:42:00) [8]
>Destroyer © (22.07.05 22:30)

WriteInteger('SectionName', 'KeyName', Byte(Font.Style));

Андрей Молчанов (2005-07-22 22:39:00) [9]
Записывать 4 логических выражения - подчеркнут, жирный, курсив, зачеркнут. Наверное.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »