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

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

Поднять MDI окно [D6]


Канадин Владимир ©   (2002-09-03 13:20:00) 

Великие Гуру. Как можно поднять MDI окно, скрытое другими MDI окнами. ActiveMDIChild недоступен для записи, а SetFocus не работает.


Канадин Владимир   (2002-09-04 10:29:00) [1]

>Игорь Шевченко © (03.09.02 17:08)
Спасибо. Именно то, что нужно.


Игорь Шевченко   (2002-09-03 17:08:00) [2]

Если переменная формы известна, то

with MyMdiForm do begin
if WindowState = wsMinimized then
WindowState := wsNormal;
Show();
end;


JohnnyJ   (2002-09-03 16:55:00) [3]

Я конечно не претендую на звание Великого Гуру :), но я обычно использую поле Tag у контрола, который активирует форму:
1. При создании формы:

SomeButton.Tag := Integer(fmView);

2. В обработчике SomeButtonClick ставлю цикл:


..
while (Integer(ActiveMDIChild) <> (Sender as TButton).Tag) do
Next;
..


Наверх

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