Программно задать шрифт и его размер для стиля

rtech

Добрый день. Подскажите, пожалуйста, как в коде скрипта отчета задать имя и размер шрифта стилю из внешних переменных.

Вот код создания переменной на 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

gpi

Используйте в скрипте:

procedure Memo2OnBeforePrint(Sender: TfrxComponent);

begin

Report.Styles.Find('Style1').Font.Name := 'Courier New';

Report.Styles.Apply;

end;