Скрипты Simple-Scada

Синтаксис

procedure SetVariableValueDT(const AVarName: string; AValue: TDateTime);

Описание

Задает значение переменной типа DateTime в отчете. AVarName - имя переменной. AValue - значение, которое будет назначено переменной. Для переменных других типов нужно использовать процедуру SetVariableValue.

Пример 1

Формирование значения даты/времени с последующей записью в переменную отчета:

var
  aDT: TDateTime;
  aReport: TM_Report;
begin
  aReport := ReportBuild('Мой_отчет');
 
  // формируем значение даты/времени в локальную переменную aDT
  aDT := EncodeDateTime(2001, 02, 03, 04, 05, 06, 777);
  // записываем значение aDT в переменную отчета "MyDateTimeVar" 
  aReport.SetVariableValueDT('MyDateTimeVar', aDT);
 
  // открываем отчет на просмотр
  aReport.View(GetClientName);
end.

Пример 2

Допустим в проекте имеется переменная myVar с типом DateTime и ее значение нужно записать в переменную отчета с именем MyDateTimeVar.

var
  aReport: TM_Report;
begin
  aReport := ReportBuild('Мой_отчет');
 
  // записываем значение из переменной "myVar" в переменную отчета "MyDateTimeVar"
  aReport.SetVariableValueDT('MyDateTimeVar', myVar.AsDateTime);
 
  // открываем отчет на просмотр
  aReport.View(GetClientName);
end.