Показать сообщение отдельно
  #4  
Старый 05.08.2015, 14:45
icWasya icWasya вне форума
Местный
 
Регистрация: 09.11.2010
Сообщения: 499
Репутация: 10
По умолчанию

Код:
 for i :=0 to ControlCount-1 do
  if Controls[i] is TSpeedButton then
    TSpeedButton(Controls[i]).Tag:=..
Ответить с цитированием