| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как из MDI-child окна динамически создать еще одно окно? [D5, D6, Win95/98, WinME, NT4, Win2k, WinXP]

NeyroSpace ©   (2002-08-28 13:12:00) 

Есть MDIchild окно. На нем кнопка. Нажимаешь на кнопку - создается окно верхнего уроня:
Application.CreateForm(TDialogForm,DialogForm);
...
DialogForm.ShowModal;

или

TForm.CreateParented(ParentModalForm.handle);

Все время ошибка по адресу...
как это сделать?

---

NeyroSpace   (2002-08-29 14:52:00) [1]

Трабла уничтожена. Оказывается если окно создано при помощи
TForm.Create(Self);
то потом из ее кода другие окна или создаются или закрываются с ошибками. Надо только через
Application.CreateForm(TForm, Form);
тогда в ее коде создание следующего окна происходит без ошибок

---

NeyroSpace   (2002-08-28 14:16:00) [2]

Тоже самое...

---

Skier   (2002-08-28 14:08:00) [3]

>NeyroSpace


var
ADialogForm : TDialogForm;
begin
//..............
ADialogForm := TDialogForm.Create(nil);
try
ADialogForm.FormStyle := fsNormal;
ADialogForm.ShowModal;
finally
FreeAndNil(ADialogForm);
end; //try
//..............
end;


---

NeyroSpace   (2002-08-28 14:04:00) [4]

Cannot make a visible window modal
хм
Причем в новом проекте создается, а в моем нет :-(

---

Skier   (2002-08-28 13:38:00) [5]

>NeyroSpace


var
ADialogForm : TDialogForm;
begin
//..............
ADialogForm := TDialogForm.Create(Application);
try
ADialogForm.ShowModal;
finally
FreeAndNil(ADialogForm);
end; //try
//..............
end;


---

NeyroSpace   (2002-08-28 13:25:00) [6]

Это в каком классе?

---

alexias   (2002-08-28 13:20:00) [7]

CreateMDIChild(name)

---

Наверх