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

MDI окна   Найти похожие ветки 

← →
interandry   (2008-09-12 14:01) [0]

Всем добрый день!!! У меня избитый вопрос.
Есть главная форма. При нажатии на кнопку создаю дочернее окно.
frm_Equipment:= Tfrm_Equipment.Create(Application);
При зарытии в обработчике события указываю
Action:= caFree;
Как проверить состояние дочернего окна, для того что бы при повторном нажатии на кнопку создавался только один экземпляр дочернего окна?


← →
Palladin ©   (2008-09-12 15:24) [1]

Зачем же тогда его убивать? Один раз создал при инициализации приложения и все. Достаточно просто скрывать.


← →
Правильынй$Вася   (2008-09-12 15:28) [2]


> при повторном нажатии на кнопку создавался только один экземпляр
> дочернего окна?

а нафига тогда MDI ?


← →
Palladin ©   (2008-09-12 15:42) [3]


> Правильынй$Вася   (12.09.08 15:28) [2]

думаешь господь запрещает использовать в качестве MDIChild разные формы?


← →
Правильный$Вася   (2008-09-12 15:50) [4]


> разные формы?

а они у автора есть?


← →
MsGuns ©   (2008-09-12 15:57) [5]

Перед открытием дочки определенного класса пробежаться по все дочкам и проверить, имеется ли среди них такая (TForm.MDIChildCount, MDIChildren) и, если имеется, ничего не делать


← →
Юрий Зотов ©   (2008-09-12 15:59) [6]

Написать класс дочки, как синглтон и навсегда забыть о всех проверках.


← →
Palladin ©   (2008-09-12 16:00) [7]


> Правильный$Вася   (12.09.08 15:50) [4]

ну а на кой ему тогда MDI ?


← →
Правильный$Вася   (2008-09-12 16:05) [8]


> Palladin ©   (12.09.08 16:00) [7]

вот и я спрашиваю
а то находятся любители использовать mdi только потому, что там удобно окошки каскадировать



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

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



Память: 0.46 MB
Время: 0.011 c
2-1220876858
programmer90
2008-09-08 16:27
2008.10.19
как убрать у комбобокса убрать эту штуку справа


2-1221290498
@!!ex
2008-09-13 11:21
2008.10.19
Как добавить пункт меню в контекстное меню Explorer a


2-1221226569
webpauk
2008-09-12 17:36
2008.10.19
PanelResize


2-1220825497
dars73
2008-09-08 02:11
2008.10.19
Подскожите пожалуйста почему я не могу подключить модуль


2-1221073858
Alral
2008-09-10 23:10
2008.10.19
TBitmap.Transparent




   Наверх