Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.05.20;
Скачать: CL | DM;

Вниз

MDI формы   Найти похожие ветки 

 
kilya ©   (2007-03-21 15:55) [0]

У меня вот такая проблемка
Есть главная ворма F1 приложения, есть вторая форма F2(Style:MDIForm) и есть форма F3 (Style:MDIChild).
На форме F2 на кнопочку срабатывает :TF3.Create(TF2).
Выдается исключение: "не могу создать форму. нет активной MDI формы". Если создавать для F1, то все норм. Дочерние формы можно создавать только для главной формы? Уверен что проблема в какой-нибудь мелочи: переключить свойство или т.п.. Подскажите кто-нибудь :)


 
Сергей М. ©   (2007-03-21 16:34) [1]

Главной формой MDI-приложения должна быть именно MDIParent-форма, а не какая-то иная.
Такова MDI-концепция и такова особенность VCL, придерживающейся этой концепции.


 
kilya ©   (2007-03-21 16:45) [2]

Не понял :(
F1.FormStyle : fsNormal        -- Main Form в Projects/Options/Forms
F2.FormStyle : fsMDIForm
F3.FormStyle : fsMDIChild

F2 не является MDIparent для F3 ?


 
Сергей М. ©   (2007-03-21 16:56) [3]


> F2 не является MDIparent для F3 ?


Не является. Потому что она не главная.


 
Сергей М. ©   (2007-03-21 16:58) [4]

Цитата из "генофонда":

procedure TCustomForm.CreateWindowHandle(const Params: TCreateParams);
..
 if (FormStyle = fsMDIChild) and not (csDesigning in ComponentState) then
 begin
   if (Application.MainForm = nil) or
     (Application.MainForm.ClientHandle = 0) then
     raise EInvalidOperation.Create(SNoMDIForm); //<-здесь ты получаешь отлуп, потому что у тебя Application.MainForm.ClientHandle = 0



 
kilya ©   (2007-03-21 17:02) [5]

пасиба :)



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

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

Наверх




Память: 0.47 MB
Время: 0.05 c
15-1177077151
Real
2007-04-20 17:52
2007.05.20
Глюк формума


2-1177931656
allucard
2007-04-30 15:14
2007.05.20
Функция PaintTo - как убрать рамку?


15-1177164438
Raqw
2007-04-21 18:07
2007.05.20
Подключается к интернету, но не загружаются страницы!


2-1177596120
I-New
2007-04-26 18:02
2007.05.20
как у знать сколько сколько Item ов в TlistBox


2-1178119436
I-New
2007-05-02 19:23
2007.05.20
Открыть папку explorer ом из Delphi