![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ActionList ;- программное изменение картинки
Ranikin © (2002-12-25 11:38:00)Есть ActionList, и собственно Actions.
Как поменять программно картинку у опред Action ?
Если написать так :
ActionList.Actions[0] - то возвращается объект типа TContainedAction и собственно нельзя получить доступ к свойству ImageIndex ...
Вопрос :
Как перебрать все Actions и поменять ImageIndex ?
Вопрос №2:
Как Перебрать все объекты формы и получить к ним доступ ?
Reindeer Moss Eater (2002-12-25 11:54:00) [1]Не, вот так
for i:=0 to Pred(ActionList1.ActionCount) do
TAction(ActionList1.Actions[i]).ImageIndex:=NewValue;
VAleksey (2002-12-25 11:48:00) [2]for i:=0 to Form1.ComponentCount - 1 do
begin
if Form1.Components[i] is T..//нужный тип
then
begin
T..(Form1.Components[i]).ImageIndex:=..
end;
end;
Ответ типа на оба вороса :))
Reindeer Moss Eater (2002-12-25 11:47:00) [3]Перебрать все Actions - GetChildren