Главная форма
FormStyle: fsMDIForm;
Name:Form1;
Дочерняя
FormStyle: fsMDIChild;
Name:Form2;
Код
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2:=TForm2.Create(nil);//форма не появляется,в чём проблема?
end;
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
Создание дочерней формы...., вывод её на экран |
Vardes |
Сообщение
#1
|
Пионер Группа: Пользователи Сообщений: 131 Пол: Мужской Репутация: 0 |
При создании дочерней формы, она не появляется на экране при вызове её из главной формы(
Главная форма FormStyle: fsMDIForm; Name:Form1; Дочерняя FormStyle: fsMDIChild; Name:Form2; Код procedure TForm1.Button1Click(Sender: TObject); begin Form2:=TForm2.Create(nil);//форма не появляется,в чём проблема? end; |
klem4 |
Сообщение
#2
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Цитата тем более метод Show не надо указывать при создании формы, она и так должна высветится... Это если форма создается приложением (как главная форма), а дочернюю ты как бы сам создаешь, динамически, и вызывая конструктор TForm.Create(AOwner: TComponent) ничего "высвечиться" не должною. Посмотри аттач, этот проект у тебя нормально работает ? Прикрепленные файлы _forum.rar ( 161.57 килобайт ) Кол-во скачиваний: 205 -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Текстовая версия | 2.05.2024 3:44 |