Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Использование свойства TAG

Автор: Woland 19.2.2003, 11:39

Широко известно, как использовать свойство TAG в операторах вроде IF...Then или Case..of..

Вопрос таков: А нельзя ли, имея значение тэга, присваивать какое-либо действие носящему этот тэг компоненту?

Пример: имеется десяток Image. Тэги от 1 до 10.
Нельзя ли с помощью FOR загрузить в них по очереди какой-либо bitmap?

Или придётся прописывать для каждого отдельно (типа Image1.Picture:=...
Image2.Picture:=...)?

А, может, есть какое-нибудь более элегантное решение?

Автор: Vex 19.2.2003, 12:16

Код

for i:=1 to 10 do begin
 (Components[i] as TImage).Picture:=...;
end;

Еще можно проверить, чтоб это был Имэйдж, например, если у тебя на форме располоджены Имэйджы и Button,с именем b1, то это проверяется так

Код


if (Components[i].Name <> 'b1') then begin ...

Автор: Vit 19.2.2003, 22:41

FindComponent