Важно! Перед началом работы с архивными процедурами, обязательно ознакомьтесь с примером их использования.
Синтаксис
procedure ArchiveIntegral(AArcVar, AResVar: TM_Variable; AFrom, ATo: TDateTime; APeriod: Integer; const ALayer: Byte = 0);
Описание
Вычисляет интеграл из архивных данных переменной AArcVar за период от AFrom до ATo. APeriod - период приведения. Результат записывается в переменную AResVar. ALayer - необязательный параметр(по-умолчанию равен нулю), который определяет слой архива: 0 - основной; 1 - минутный; 2 - часовой; 3 - суточный.
Пример кода
var
DateStart, DateEnd: TDateTime;
begin
DateEnd:= Now; // текущие дата и время
DateStart:= IncDay(DateEnd, -1); // уменьшить дату на 1 день
// вычислить интеграл переменной "MyVariable" за период от "DateStart"
// до "DateEnd" и записать результат в переменную "MyVariableRes"
ArchiveIntegral(MyVariable, MyVariableRes, DateStart, DateEnd, 1);
end.