ArchiveValueByTime

Назад  Домой  Вперед  Печать

Синтаксис

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.