получить список форм кот. созданы в Application через CreateForm

← →
AFrolov © (2003-03-13 17:45) [0]

получить список форм кот. созданы в Application через CreateForm
Зарание спасибо.

← →
Anatoly Podgoretsky © (2003-03-13 17:54) [1]

Открыть .dpr или посмотреть в свойствах проектп

← →
leonon © (2003-03-13 18:00) [2]

Screen.Forms[]

← →
Anatoly Podgoretsky © (2003-03-13 18:13) [3]

leonon © (13.03.03 18:00)
Этого не просили

← →
leonon © (2003-03-13 18:16) [4]

Я понял что в рантайм...

← →
Anatoly Podgoretsky © (2003-03-13 18:18) [5]

Это уже не важно, но это не уточнялось

Удалено модератором
Примечание: Личная переписка

Если через CreateForm или Create(Application), то так:

with Application do
for i := 0 to ComponentCount - 1 do
if Components[i] is TCustomForm then
List.Add(Components[i])

где List - экземпляр класса TList (а еще лучше использовать потокобезопасный TThreadList).

Спасибо

получить список форм кот. созданы в Application через CreateForm Найти похожие ветки