Ещё раз приветствую Всех!
Подскажите как реализовать заголовок в Периодическом отчёте.
Есть отчёт. Выбираем потребителя и период отчёта. Это сам скрипт:
var
aReport: TM_Report;
begin
//vrDynamic_name.Value := vrAsumm.Name;
vrDynamic_A_Begin.Value := vrAsumm.Value;
vrDynamic_A_End.Value := vrAsumm.Value;
vrDynamic_A_Raznica.Value := vrAsumm.Value;
aReport := ReportBuild('Периодический1');
aReport.View(GetClientName);
end.
А теперь вопрос, как мне текст из поля которое показано ниже на скрине вставить в отчёт на против Потребитель, там где у меня vrDynamic_name, что бы оно менялось согласно выбранного потребителя в списке.
Заранее благодарен за ответ.
Сделал так:
var
aReport: TM_Report;
begin
vrDynamic_name.Value := ComboBox2.Items[0].Text;
vrDynamic_A_Begin.Value := vrAsumm.Value;
vrDynamic_A_End.Value := vrAsumm.Value;
vrDynamic_A_Raznica.Value := vrAsumm.Value;
aReport := ReportBuild('Периодический1');
aReport.View(GetClientName);
end.
Доступные свойства и методы для работы с компонентом "Список" можно найти в руководстве по ссылке (https://simple-scada.com/help/script/tmcombobox.html). Чтобы вывести текст выбранной строки списка, нужно использовать свойство "Text (https://simple-scada.com/help/script/cmbtext.html)". Также по скриншотам видно, что используется шаблонное окно. Поэтому в скрипте формирования отчета нужно выполнять поиск компонента "Список" используя функцию "GetTemplateObject (https://simple-scada.com/help/script/gettemplateobject.html)":
var
aReport: TM_Report;
aComboBox: TM_ComboBox;
begin
aComboBox := GetTemplateObject('ComboBox2') as TM_ComboBox;
vrDynamic_name.Value := aComboBox.Text;
vrDynamic_A_Begin.Value := vrAsumm.Value;
vrDynamic_A_End.Value := vrAsumm.Value;
vrDynamic_A_Raznica.Value := vrAsumm.Value;
aReport := ReportBuild('Периодический1');
aReport.View(GetClientName);
end.