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

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

Как получить список всех созданных фреймов приложения?


Ega23 ©   (2006-06-29 16:19:00) 


 for i:=0 to Application.ComponentCount-1 do
  if (Application.Components[i] is TFrame) then
   Memo1.Lines.Add((Application.Components[i]).ClassName);


Это корректно?


Ega23   (2006-06-30 09:40:00) [1]


> Ну и ладно. Owner-то у него, надеюсь, либо Application либо
> форма?
> Или Owner в твоей задаче тоже может быть nil? (тогда рекомендую
> повеситься :-))
>


Может и nil  :-(
Ладно, я всё равно уже совсем по другому пути пошёл...


Vlad   (2006-06-30 09:12:00) [2]


> Ega23 ©   (29.06.06 16:46) [8]


> В определённый момент времени у некоторых фреймов Parent=nil.


Ну и ладно. Owner-то у него, надеюсь, либо Application либо форма?
Или Owner в твоей задаче тоже может быть nil? (тогда рекомендую повеситься :-))


Phoroon~   (2006-06-29 22:00:00) [3]


> Создать переменную я и сам могу. Меня интересует именно
> список всех фреймов от приложения.

Ну так а я чего и говорю, создай TList и при создании каждого фреймапиши туда указатель!!!!


Ega23   (2006-06-29 16:46:00) [4]


> И что дальше? Рекурсивную процедуру из 2х строк сложно написать?
>  Плясать ведь все равно от формы нужно.
>


В определённый момент времени у некоторых фреймов Parent=nil.


Vlad   (2006-06-29 16:42:00) [5]


> Stakan ©   (29.06.06 16:37) [5]


> А если у фрейма Parent не форма?

И что дальше? Рекурсивную процедуру из 2х строк сложно написать? Плясать ведь все равно от формы нужно.


Ega23   (2006-06-29 16:39:00) [6]


> А если у фрейма Owner не Application?


Это я не подумал. Действительно...

Ладно, попробую с другой стороны подойти.
Всем спасибо.


Stakan   (2006-06-29 16:37:00) [7]


> Можно получить список всех форм приложения
> (Screen.Forms) и перебирать уже внутри них, причем
>через массив Controls[]
> Возможно, так будет оптимальнее

А если у фрейма Parent не форма?


Vlad   (2006-06-29 16:36:00) [8]


> Ega23 ©   (29.06.06 16:32) [2]

Можно получить список всех форм приложения (Screen.Forms) и перебирать уже внутри них, причем через массив Controls[]
Возможно, так будет оптимальнее.


Stakan   (2006-06-29 16:36:00) [9]


> А сколько там компонентов-то? Не так уж и много: все
> формы, фреймы, дата модуль и HintWindow

А если у фрейма Owner не Application?


Ega23   (2006-06-29 16:32:00) [10]


> Так если приложение средней поршивости, ему же надоест перебирать
> компоненты всего приложения.


А сколько там компонентов-то? Не так уж и много: все формы, фреймы, дата модуль и HintWindow


> Создай переменную типа TList и пихай указатели при создании
> каждого фрейма, а по листу поиск пройдет намного быстрей.
>
>

Создать переменную я и сам могу. Меня интересует именно список всех фреймов от приложения.


Phoroon~   (2006-06-29 16:26:00) [11]

Так если приложение средней поршивости, ему же надоест перебирать компоненты всего приложения.

ИМХО
Создай переменную типа TList и пихай указатели при создании каждого фрейма, а по листу поиск пройдет намного быстрей.


Наверх

Титульная страница Поиск, карта сайта Написать письмо