Присвоить свойству Font стандартные значения

@ФМиИ · Регистрация: 25.04.2012

Author24 — интернет-сервис помощи студентам

Есть ли стандартная функция, которая присваивает стандартные значения Font, чтобы не прописывать все это:

C++

Form1->StringGrid1->Font->Charset=DEFAULT_CHARSET;
Form1->StringGrid1->Font->Color=clWindowText;
Form1->StringGrid1->Font->Height=-13;
Form1->StringGrid1->Font->Name="Tahoma";
Form1->StringGrid1->Font->Orientation=0;
Form1->StringGrid1->Font->Pitch=0;
Form1->StringGrid1->Font->Quality=0;
Form1->StringGrid1->Font->Size=8;
//... и т.д.

Если это не возможно, как правильно присвоить Style все значения false?
нерабочий вариант:

C++

1	Form1->StringGrid1->Font->Style->fsBold=false

@volvo · 20.07.2012, 11:16

ФМиИ, кто мешает создать шрифт (только потом, при завершении программы не забыть удалить), присвоить ему нужные параметры:

C++

    TFont *DefFont; // в классе формы
 
    DefFont = new TFont();
    DefFont->Charset=DEFAULT_CHARSET;
    DefFont->Color=clRed;
    DefFont->Height=-13;
    DefFont->Name="Tahoma";
    DefFont->Orientation=0;
    DefFont->Pitch=0;
    DefFont->Size=12;
    // ...

, а потом, там где нужно:

C++

1	StringGrid1->Font->Assign(DefFont);

А с fsBold-ом так не получается, потому что это множество. Вот так должно сработать:

C++

1	Form1->StringGrid1->Font->Style = Form1->StringGrid1->Font->Style >> fsBold; // убираем из множества

@ФМиИ · 20.07.2012, 11:22 **[ТС]**

Это присваивает стиль fsBold. Мне нужно, наоборот, чтобы он и каждый подпункт в Style был не активен (false).

@volvo · 20.07.2012, 11:36

Сообщение от ФМиИ

Это присваивает стиль fsBold

Это не присваивает, а убирает стиль Bold. Занесение в множество - это "<<", извлечение - ">>". Хотя, если надо очистить Style полностью - то можно сделать так:

C++

1	Form1->StringGrid1->Font->Style = TFontStyles();

Сообщение от ФМиИ

Получается нет возможности присвоить Font стандартные значения?

Что такое "стандартное значение" для шрифта? Скажем, Height. Почему ты записал туда -13? У меня вот по умолчанию выставлено -11. И какое из них правильное? Нет такого понятия "стандартные значения".

C++

1 2	DefFont = new TFont(); DefFont->Assign(StringGrid1->Font);

при старте программы и у тебя в DefFont хранится то, что выставлено в Object Inspector-е. Как это может усложнить задачу - непонятно.

@nick42 · 20.07.2012, 11:44

C++

1	... ->Font->Style = TFontStyles()>>fsBold>>fsItalic>>... ;

- это установка стилей в false,

C++

1	... ->Font->Style = TFontStyles()<<fsBold<<fsItalic ... ;

- а так - в true

@ФМиИ · 20.07.2012, 12:43 **[ТС]**

Сообщение от UI

Что такое "стандартное значение" для шрифта? Скажем, Height. Почему ты записал туда -13? У меня вот по умолчанию выставлено -11. И какое из них правильное? Нет такого понятия "стандартные значения".

Да действительно. Тогда так - как сохранить в файл свойство Font? Таким же образом, записывая все его подпункты?

Добавлено через 27 минут
Как теперь в файл записать этот Style - на него везде билдер орет.

C++

TStringList *Dann=new TStringList;
   Dann->Append(StringGrid1->Font->Charset);
   Dann->Append(StringGrid1->Font->Color);
   Dann->Append(StringGrid1->Font->Height);
   Dann->Append(StringGrid1->Font->Name);
   Dann->Append(StringGrid1->Font->Orientation);
   Dann->Append(StringGrid1->Font->Pitch);
   Dann->Append(StringGrid1->Font->Quality);
   Dann->Append(StringGrid1->Font->Size);
   Dann->Append(StringGrid1->Font->Style);//на эту строчку орет
   Dann->SaveToFile("dannie.txt");
   delete Dann;

@nick42 · 20.07.2012, 13:26

а так нельзя, - TFontStyles это целая функция, а не одна переменная. Если уж очень нужно запомнить стили, то программно преобразовать в значение и потом делать обратное преобразование. Например таким макаром (запись в четыре младших бита)__

C++

     TFontStyles el = Label1->Font->Style ;
     int h  = 0 | el.Contains(fsBold) |
              2*el.Contains(fsItalic) |
              4*el.Contains(fsUnderline) |
              8*el.Contains(fsStrikeOut) ;

Добавлено через 12 минут
Или так (по Вашим текстам)__

C++

   Dann->Append(1&StringGrid1->Font->Style.Contains(fsBold));
   Dann->Append(1&StringGrid1->Font->Style.Contains(fsItalic));
   Dann->Append(1&StringGrid1->Font->Style.Contains(fsUnderline));
   Dann->Append(1&StringGrid1->Font->Style.Contains(fsStrikeOut));

@volvo · 20.07.2012, 15:09

Сообщение от ФМиИ

Тогда так - как сохранить в файл свойство Font? Таким же образом, записывая все его подпункты?

Вот прямо больше делать нечего, как вручную записывать. Есть средства в Билдере, позволяющие записать шрифт в файл. Надо только чуть-чуть пошаманить, чтобы ими воспользоваться:

1) создаем обертку над TFont-ом:

C++

class TFontWrapper : public TComponent
{
private:
    TFont *FFont;
    void __fastcall SetFont(TFont *fnt)
    {
        FFont->Assign(fnt);
    }
public:
    __fastcall TFontWrapper(TComponent *AOwner) : TComponent(AOwner)
    {
        FFont = new TFont;
    }
    __fastcall virtual ~TFontWrapper(void)
    {
        delete FFont;
    }
__published:
    __property TFont *Font = {read = FFont, write = SetFont};
};

2) и теперь - когда надо сохранить - сохраняем шрифт в файл, а когда надо прочесть - читаем. Для проверки сделал 2 кнопки: по первой текущий Font сохраняется в файл, после чего цвет шрифта меняется и грид перерисовывается. А потом восстанавливаем шрифт из файла и опять перерисовываем грид, чтоб убедиться, что цвет восстановился:

C++

void __fastcall TForm1::btnSaveFontClick(TObject *Sender)
{
    TFileStream *fs = new TFileStream("font.dat", fmCreate);
    wrap = new TFontWrapper(0);
 
    wrap->Font = StringGrid1->Font;
    fs->WriteComponent(wrap);
    delete wrap;
    delete fs;
 
    StringGrid1->Font->Color = clRed;
    StringGrid1->Invalidate();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::btnLoadFontClick(TObject *Sender)
{
    TFontWrapper *wrap = new TFontWrapper(0);
    TFileStream *fs = new TFileStream("font.dat", fmOpenRead);
 
    fs->ReadComponent(wrap);
    StringGrid1->Font->Assign(wrap->Font);
 
    delete fs;
    delete wrap;
    StringGrid1->Invalidate();
}

Ну, try/finally сам добавишь, хотя я предпочитаю работать с std::auto_ptr, а не удалять объекты руками.

@Avazart · 20.07.2012, 15:37

C++

1	Form->Font->/задаем свойства/

В компонентах фомы например

C++

1	Label->ParentFont= true;

Еще можно посмотреть есть ли такое

C++

1	Screen->Font->/.../

???

@ФМиИ 3 / 3 / 0 Регистрация: 25.04.2012 Сообщений: 50
	20.07.2012, 11:22 [ТС]	3
	Это присваивает стиль fsBold. Мне нужно, наоборот, чтобы он и каждый подпункт в Style был не активен (false). 0

Присвоить свойству Font стандартные значения

Решение