| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Перебрать все компоненты на всех формах в проекте [D7, XP]

Прохожев ©   (2008-06-06 08:15:00) 

Подкиньте плиз код или подскажите как лучше искать в гугле . Спасибо.

---

Прохожев   (2008-06-06 12:30:00) [1]

> Юрий Зотов ©   (06.06.08 09:56) [7]


Отлично, спасибо ...

---

Юрий Зотов   (2008-06-06 09:58:00) [2]

Поправка - работаем с Components[ j]

---

Юрий Зотов   (2008-06-06 09:56:00) [3]

> Прохожев   (06.06.08 08:57)

Если формы создавались с владельцем Application - т.е. через Application.CreateForm(...) или через TForm.Create(Application) - то ВСЕ такие формы будут в списке Application.Components.

for i := 0 to Application.ComponentCount - 1 do
 if Application.Components[i] is TForm then
   with TForm(Application.Components[i]) do
     for j := 0 to ComponentCount -1 do
     begin
       // Работаем с Components[i]
     end;


---

Anatoly Podgoretsky   (2008-06-06 09:08:00) [4]

> Прохожев  (06.06.2008 8:57:05)  [5]

Это не все формы

---

Прохожев   (2008-06-06 08:57:00) [5]

> Что значит на всех формах?


Все вормы в прямом смысле. Т.е Form1, Form2, Form3 и т.п.
На каждой форме есть компоненты к которым нужно обратиться одним махом.

Кажись

TScreen.Forms
TForm.Components

то, что надо ...

---

Anatoly Podgoretsky   (2008-06-06 08:47:00) [6]

> Прохожев  (06.06.2008 8:15:00)  [0]

Что значит на всех формах?

---

Рамиль   (2008-06-06 08:39:00) [7]

TScreen.Forms
TForm.Components

---

{RASkov}   (2008-06-06 08:37:00) [8]

Screen.Forms, ComponentCount, Components[]

---

Прохожев   (2008-06-06 08:29:00) [9]

Удалено модератором
Примечание: Создание пустых сообщений

---

Наверх