Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
| klem4 |
11.11.2006 12:33
Сообщение
#1
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Рузультат слудеющих действий будет подходить под критерий "Динамически созданная форма" ?
Создаем стандартное приложение Delphi. Имеем Form1 in Utin1.pas. Добваляем к проекту еще одну форму (Form2 in Unit2.pas) На вторую форму кидам с панелей всякую всячину (лейблы, эдиты, стринггриды итд) Из Project1.dpr удаляем Application.CreateForm(TForm2, Form2); На Form1 кидаем кнопку, в обработчике нажатия на которую пишем следующее: procedure TForm1.Button1Click(Sender: TObject); Созданная таким образом форма является динамической ? Почему меня интересует этот вопрос. На соклько я понял надо это делать по другому, все руками.Самому создавать юнит, руками описывать там класс формы, писать какие компоненты будут на форме, в конструкторе класса регестрировать эти компоненты, задвать их свойства... -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
![]() ![]() |
| hiv |
21.11.2006 13:39
Сообщение
#2
|
|
Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 660 Пол: Мужской Реальное имя: Михаил Репутация: 11 |
На соклько я понял надо это делать по другому, все руками.Самому создавать юнит, руками описывать там класс формы, писать какие компоненты будут на форме, в конструкторе класса регестрировать эти компоненты, задвать их свойства... Почти руками: я этого "руками" не делаю, создаю обычную форму и делаю все как обычно, потом в том unit где твоя форма удаляю строку var Form2: TForm2; , в Project1.dpr удаляю этот юнит из объявления uses и строчку Application.CreateForm(TForm2, Form2); Вуаля! Все -------------------- Никогда не жадничай. Свои проблемы с любовью дари людям!
|
klem4 Динамическое создание формы 11.11.2006 12:33
volvo Она является динамически (а не автоматически) созд... 11.11.2006 12:39
klem4 hiv, я так и делаю, только боюсь как бы препод не ... 21.11.2006 15:43
Malice
Не дай Бог переделывать рпидется :!fire:
Мн... 21.11.2006 15:53
hiv Боже!!! :mega_chok:
Это даже хуже че... 21.11.2006 15:54![]() ![]() |
|
Текстовая версия | 10.12.2025 22:06 |