Вниз
Скачать: CL | DM;

Поиск определенного компонента на форме   Найти похожие ветки 

 
DimaK   (2005-06-04 20:42) [0]

Привет всем мастерам!

Возникла такая задача, в проге много форм (порядка 30 штук).
Все дело в том, что на всех формах существует компонент Image,
а на некоторых несколько.

Как-то каждую форму и каждый компонент на ней описывать некрассиво, хотелось бы проверить каждую форму, найти на ней компонент Image и загрузить туда определенную картинку.

Что-то никак не соображу, как на каждой форме искать определенный компонент. Может кто подскажет.
Заранее большое спасибо!


 
Defunct ©   (2005-06-04 20:50) [1]

Выгоднее всего чтобы каждая форма сама "знала" какую картинку загружать в принадлежащий ей Image. А знать она может например так: в конструкторе формы ей передается параметр - имя файла, который надо загрузить в Image.

> Поиск определенного компонента на форме
На основной вопрос не буду отвечать, т.к. считаю, что вы занимаетесь неправильным и ненужным делом. Судя по описанию задачи.


 
KilkennyCat ©   (2005-06-04 21:01) [2]


> [1] Defunct ©   (04.06.05 20:50)


Возможно, автор некорректно (неполно) описал алгоритм?
Предположим, имеет место требование разовой смены всех картинок, дабы потом быстрее работать?
Однако "искать" в данном случае звучит некорректно, они ж все известны...
К ним нужно просто обратится. Как к массиву компонент.


 
Anatoly Podgoretsky ©   (2005-06-04 21:56) [3]

А если неизвестны, то все равно какую менять.


 
lookin ©   (2005-06-04 23:15) [4]

Типа

function FindImage(Form: TForm; ImageName: string): TImage;
begin
 for i:=0 to Form.ComponentCount-1 do
 if (Form.Components[i] is TImage) and (Form.Components[i].Name=ImageName) then Result:=Form.Components[i] as TImage;
end;  
 
?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.031 c
1-1118062914
Олег из Москвы
2005-06-06 17:01
2005.06.29
Непонятные ошибки.


1-1118091583
Karnak
2005-06-07 00:59
2005.06.29
Путь папки windows


6-1112326674
atruhin
2005-04-01 07:37
2005.06.29
Влияние Content-Length на Keep-Alive в HTTP протоколе


14-1117701386
quickblack
2005-06-02 12:36
2005.06.29
А как войти на форум под своим ником?


4-1115563018
kzpapgsnzaaret
2005-05-08 18:36
2005.06.29
текстовое поле ч чужом приложении




   Наверх