Программно задать шрифт и его размер для стиля
Раздел: FastReport VCL
Добрый день. Подскажите, пожалуйста, как в коде скрипта отчета задать имя и размер шрифта стилю из внешних переменных.
Вот код создания переменной на C++
TfrxVariable *VarFontName = frxReport->Variables->Add();
VarFontName->Name = String(L"FontName");
VarFontName->Value = String(L"\"Times New Roman\"");
В самом отчете я пробовал получить значение вот таким образом:
Report.Styles.Find("Paragraph").Font.Name = Report.Variables.Variables["FontName"];
но это не срабатывает и выдает ошибки конвертации.
Также хотел бы узнать, в каком именно обработчике необходимо задавать параметры стиля, чтобы применить их к отчету? Я делал это в OnStartReport
Комментарии
Используйте в скрипте:
procedure Memo2OnBeforePrint(Sender: TfrxComponent);
begin
Report.Styles.Find('Style1').Font.Name := 'Courier New';
Report.Styles.Apply;
end;