Вниз
Скачать: CL | DM;

Как из MDI-child окна динамически создать еще одно окно?   Найти похожие ветки 

← →
NeyroSpace   (2002-08-28 13:12) [0]

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

или

TForm.CreateParented(ParentModalForm.handle);

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


← →
alexias ©   (2002-08-28 13:20) [1]

CreateMDIChild(name)


← →
NeyroSpace   (2002-08-28 13:25) [2]

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


← →
Skier ©   (2002-08-28 13:38) [3]

>NeyroSpace


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


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

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


← →
Skier ©   (2002-08-28 14:08) [5]

>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:16) [6]

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


← →
NeyroSpace   (2002-08-29 14:52) [7]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c
1-27062
orion_st
2002-08-27 11:26
2002.09.09
шрифт TNode в TTreeView


3-26886
Ciklon
2002-08-18 17:27
2002.09.09
инсталяция


1-27003
Lord_BTR
2002-08-20 15:42
2002.09.09
Создание Help-файлов


14-27206
Вячеслав
2002-08-15 12:27
2002.09.09
FORTRAN чтобы это значило.


1-27048
alena.svt
2002-08-27 21:13
2002.09.09
Dialogs.pas




   Наверх