Показать сообщение отдельно
  #6  
Старый 18.09.2011, 11:46
ewgeny911 ewgeny911 вне форума
Прохожий
 
Регистрация: 18.09.2011
Сообщения: 4
Репутация: 10
По умолчанию

Нет, так не поучится, потому что тип неизвестен.

(form as TForm1).Label1.Caption := 'some text'

т.е в этой строке неизвестно что ставить TForm1 или TForm2088.
Хочется передавать в процедуру ссылки на разные формы и у них разные компоненты.
Это нужно потому что в программе есть много разных похожих форм, у на обработчиках событий компонентов этих форм одинаковый код. И такого одинакового кода 90%. Поэтому хотелось бы вынести этот код в отдельные процедуры и в эти процедуры передавать только ссылку на форму, к какой он относится.
Ответить с цитированием