Как найти форму в Делфи, созданную на этапе выполнения
От: Red_Baron  
Дата: 16.09.05 13:47
Оценка:
Доброго дня, уважаемые специалисты и новички!
У меня возникла следующая проблема:
я создаю на этапе выполнения форму(например

TForm2.Create (Application); 
Caption:= 'Window1'

) и на ней есть, например, какой то Edit1. Затем я создаю еще такую же форму
TForm2.Create (Application); 
Caption:= 'Window2'

А теперь вопрос, как мне с другой формы(например с Form1), добраться к Edit1 конкретной формы? Пускай это будет первая созданная формаформа с

Caption = 'Window1'

Заранее, большое спасибо всем откликнувшимся!
Re: Как найти форму в Делфи, созданную на этапе выполнения
От: Drago Россия  
Дата: 16.09.05 13:54
Оценка:
Здравствуйте, Red_Baron, Вы писали:

Screen.Forms вам поможет
Re: Как найти форму в Делфи, созданную на этапе выполнения
От: Oleg A. Bachin Украина  
Дата: 16.09.05 13:55
Оценка:
Здравствуйте, Red_Baron, Вы писали:

R_B>Доброго дня, уважаемые специалисты и новички!

R_B>У меня возникла следующая проблема:
R_B>я создаю на этапе выполнения форму(например

R_B>
R_B>TForm2.Create (Application); 
R_B>Caption:= 'Window1' 
R_B>

R_B>) и на ней есть, например, какой то Edit1. Затем я создаю еще такую же форму
R_B>
my_form_1 := TForm2.Create (Application); 
R_B>Caption:= 'Window2'
R_B>

R_B>А теперь вопрос, как мне с другой формы(например с Form1), добраться к Edit1 конкретной формы? Пускай это будет первая созданная формаформа с

R_B>
my_form_1.Caption = 'Window1' 
R_B>

R_B>Заранее, большое спасибо всем откликнувшимся!

или заводи список... никто ж не знает что тебе нужно...
... << RSDN@Home 1.1.4 beta 6a rev. 436>>
Best regards,
Oleg A. Bachin
Re[2]: Как найти форму в Делфи, созданную на этапе выполнени
От: Red_Baron  
Дата: 16.09.05 13:58
Оценка:
Здравствуйте, Drago, Вы писали:

D>Здравствуйте, Red_Baron, Вы писали:


D>Screen.Forms вам поможет


и как работает этот Screen.Forms?
объясните пожалуйста?
Re[3]: Как найти форму в Делфи, созданную на этапе выполнени
От: Drago Россия  
Дата: 16.09.05 14:01
Оценка:
Здравствуйте, Red_Baron, Вы писали:

R_B>и как работает этот Screen.Forms?

R_B>объясните пожалуйста?
при содании формы она автоматически заносится "в реестр" форм. доступ к этому массиву можно получить через свойство Forms объекта Screen.

дальше все зависит от того что вам нужно
Re[3]: Как найти форму в Делфи, созданную на этапе выполнени
От: svd71 http://visualdesigner.fatal.ru/
Дата: 16.09.05 17:12
Оценка:
Здравствуйте, Red_Baron, Вы писали:

R_B>Здравствуйте, Drago, Вы писали:


D>>Здравствуйте, Red_Baron, Вы писали:


D>>Screen.Forms вам поможет


R_B>и как работает этот Screen.Forms?

R_B>объясните пожалуйста?

Перечисление созданных форм определенного класса (вариант TForm2)...
...
  for i := 0 to Screen.Forms.Count -1 do
    if Screen.Forms[i] is TForm2 then
       Caption := Screen.Forms[i].Name;
...
Re: Как найти форму в Делфи, созданную на этапе выполнения
От: Аноним  
Дата: 19.09.05 11:02
Оценка:
Тебе необходимо пройти по массиву Application.Forms и найти свою форму. А потом у найденой формы вызвать метод FindComponent и привести его к TEdit
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.