Поднять MDI окно

← →
Канадин Владимир (2002-09-03 13:20) [0]

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

← →
JohnnyJ © (2002-09-03 16:55) [1]

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

SomeButton.Tag := Integer(fmView);

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

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

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

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

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

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

Поднять MDI окно Найти похожие ветки