![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Поиск определенного компонента на форме [D7, WinXP]
DimaK © (2005-06-04 20:42:00)Привет всем мастерам!
Возникла такая задача, в проге много форм (порядка 30 штук).
Все дело в том, что на всех формах существует компонент Image,
а на некоторых несколько.
Как-то каждую форму и каждый компонент на ней описывать некрассиво, хотелось бы проверить каждую форму, найти на ней компонент Image и загрузить туда определенную картинку.
Что-то никак не соображу, как на каждой форме искать определенный компонент. Может кто подскажет.
Заранее большое спасибо!
lookin (2005-06-04 23:15:00) [1]Типа
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;
?
Anatoly Podgoretsky (2005-06-04 21:56:00) [2]А если неизвестны, то все равно какую менять.
KilkennyCat (2005-06-04 21:01:00) [3]
> [1] Defunct © (04.06.05 20:50)
Возможно, автор некорректно (неполно) описал алгоритм?
Предположим, имеет место требование разовой смены всех картинок, дабы потом быстрее работать?
Однако "искать" в данном случае звучит некорректно, они ж все известны...
К ним нужно просто обратится. Как к массиву компонент.
Defunct (2005-06-04 20:50:00) [4]Выгоднее всего чтобы каждая форма сама "знала" какую картинку загружать в принадлежащий ей Image. А знать она может например так: в конструкторе формы ей передается параметр - имя файла, который надо загрузить в Image.
> Поиск определенного компонента на форме
На основной вопрос не буду отвечать, т.к. считаю, что вы занимаетесь неправильным и ненужным делом. Судя по описанию задачи.