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

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

Привет всем. есть MDI-Child, много MDI-Child :-)


@andrew ©   (2003-01-13 15:40:00) 

Надо одну из них сделать как бы модальной, т.е. нажимаю кнопку и пока не закроешь MDI-Child форму1 все "висит" нельзя сделать ее неактивной и т.д. и т.п. Как добиться?


Игорь Шевченко   (2003-01-13 16:58:00) [1]

Проще дизайн переделать и не мучиться


smok_er   (2003-01-13 16:49:00) [2]

В принципе можно попробовать следующее:
при сздании child формы задействовать свойство tag для ее уникальности.
на onactivate child-формы сделать проверку следубщего вида:
if ActiveMDIChild.Tag <> 3 then
begin
for i := 0 to fmMian.MDIchildcount - 1 do
if fmMain.MDIChildren[i].tag = 3 then
begin
fmMain.MDIChildren[i].activate;
break;
end;
end;

не пробовал но должно работать.
Кстати, вместо 3 - таг Вашей "как бы модальной формы"


Roma   (2003-01-13 16:31:00) [3]

Нельзя же быть "немножко беременной"... ;))) Форма или модальная, или немодальная, никаких "как бы"...


Наверх

Титульная страница Поиск, карта сайта Написать письмо