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