Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

Поиск кнопок во всем проекте.   Найти похожие ветки 

← →
exciter__ ©   (2003-11-01 13:16) [0]

Подскажите как сделать поиск всех, скажем, кнопок типа TButton во всём проекте d цикле? Форм много. и потом работать с ними? т.е. чтоб можно было менять свойства всех кнопок во всём проекте? При условии, что имена кнопок могли даваться от фонаря. Если можно, пример.

---

← →
Palladin ©   (2003-11-01 13:26) [1]

Application
ComponentCount
Components[]
+рекурсия

ищи хоть до потери сознания

---

← →
_none_ ©   (2003-11-01 17:13) [2]

ну че-нить типа


for i := 0 to Application.ComponentCount - 1 do
begin
if (Application.Components[i] is TButton) then
...
end;


---

← →
_none_ ©   (2003-11-01 17:20) [3]

обшибся... на самом деле надо так:

for i := 0 to Screen.FormCount-1 do
begin
for j := 0 to Screen.Forms[i].ComponentCount - 1 do
begin
if (Screen.Forms[i].Components[j] is TButton) then
beep;
end;
end;


---

← →
Palladin ©   (2003-11-02 13:46) [4]

> _none_ © (01.11.03 17:20) [3]

Ты обшибся еше раз...
я же не зря сказал про рекурсию

---

← →
Anatoly Podgoretsky ©   (2003-11-02 14:36) [5]

Нет даже дважды, ты же не зря сказал про Application

---

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

Текущий архив: 2003.11.13;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.034 c