flash

Синтаксис:

х = flash(time);

Аргументы:

time – период изменения значения в миллисекундах.

Описание:

flash(time) – производит дискретное изменение значения на выходе с 0 на 1 с заданным периодом time в миллисекундах. Изменение выходного значения привязано к системному времени. Может использоваться для отображения мигающих элементов.

Результат:

x – значение на выходе.

Пример:

var id: integer;
initialization
  //Установка идентификатора объекта для мигания
  id = findobjectbynametrans("FillRect");       
  stick = tickcount;                            
end;                                            
  //Мигание в течение заданного времени         
if id <> 0 then begin                           
  setvisible(id, flash(1000));                  
  if (tickcount – stick) > 5000 then begin      
    setvisible(id,1);                           
    id = 0;                                     
  end;                                          
end;  

Сопутствующие материалы