Тема: Присваивание свойств для элементов в цикле
Показать сообщение отдельно
  #5  
Старый 23.02.2013, 12:26
Аватар для angvelem
angvelem angvelem вне форума
.
  
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию
Работает, только я допустил ошибку. Нужно так:
Код:
  for I :=1 to 11 do
    TTimer(FindComponent('Timer' + IntToStr(I))).Interval := RandomRange(0, 1);
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием