Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.09;
Скачать: 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 вся ветка

Текущий архив: 2002.09.09;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.016 c
1-27061
delpher_gray
2002-08-28 09:24
2002.09.09
Цикл for ... to ... do снизу вверх :-)


1-27054
olban
2002-08-27 11:10
2002.09.09
Постоянный размер шрифта


4-27258
Anton_
2002-06-28 10:07
2002.09.09
handle


1-27018
SergeyKnyazev
2002-08-29 12:03
2002.09.09
Как в RBuildere или другом отчете добавить линии под углом.


1-26950
Zelius
2002-08-29 10:42
2002.09.09
Конфликт в пакетах BPL при загрузке Delphi6