Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?

Официальный форум Simple-Scada.

Автор Тема: Периодический отчёт с динамическими переменными.  (Прочитано 2154 раз)

gps

  • Новичок
  • *
  • Сообщений: 18
    • Просмотр профиля
Здравствуйте! Подскажите как сделать.
Создал периодический отчёт с динамическими переменными, всё работает но хотелось бы, что бы в заголовок ещё добавлялось  имя группы переменных откуда берутся значения переменных.
Сам отчёт вызывается по скрипту.
Код: (delphi)
var
  aReport: TM_Report;
begin
  vrDynamic_P.Value := P_47853769.ID;
  vrDynamic_A.Value := A__po_summe_tarifov_47853769.ID;
  vrDynamic_Q.Value := Q_47853769.ID;
  vrDynamic_Hz.Value := Hz_47853769.ID;
  vrDynamic_cos.Value := cos_47853769.ID;
  vrDynamic_U.Value := U1_47853769.ID;
  vrDynamic_I.Value := I1_47853769.ID;

  aReport := ReportBuild('Периодический');
  aReport.View(GetClientName);
end.
Пробовал создать виртуальную переменную string, но что то не получилось.
« Изменён: 08 Мая 2023, 16:14:15 от Simple Scada »

Simple Scada

  • Глобальный модератор
  • *****
  • Сообщений: 293
    • Просмотр профиля
    • Simple-Scada
Здравствуйте.

Пробовал создать виртуальную переменную string, но что то не получилось.
Все верно, строковую переменную (например с именем "vrGroupName") нужно добавить в отчет. Для этого нужно кликнуть по ней правой кнопкой мыши и в раскрывшемся меню выбрать пункт "Добавить переменную" (см. скриншот "ReportVar.png" во вложении). Далее в заголовке отчета разместить компонент "Текст" и написать в нем такое выражение: "Группа переменных: {vrGroupName}" (см. скриншот "ReportText.png" во вложении). После чего в скрипт формирования отчета нужно добавить строку с записью необходимой информации в переменную "vrGroupName":
Код: (delphi)
var
  aReport: TM_Report;
begin
  vrGroupName.Value := 'Имя группы переменных';

  vrDynamic_P.Value := P_47853769.ID;
  vrDynamic_A.Value := A__po_summe_tarifov_47853769.ID;
  vrDynamic_Q.Value := Q_47853769.ID;
  vrDynamic_Hz.Value := Hz_47853769.ID;
  vrDynamic_cos.Value := cos_47853769.ID;
  vrDynamic_U.Value := U1_47853769.ID;
  vrDynamic_I.Value := I1_47853769.ID;
 
  aReport := ReportBuild('Периодический');
  aReport.View(GetClientName);
end.


gps

  • Новичок
  • *
  • Сообщений: 18
    • Просмотр профиля
Спасибо, всё получилось.
« Изменён: 10 Мая 2023, 07:09:17 от Simple Scada »