![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Поднять 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;
..