Активное MDIChild

← →
France (2002-11-14 17:12) [0]

Привет! Кто подскажет, как по имени заголовка MDIChild сделать это самое окно активным? Пытаюсь сделать что-то типа SetActiveWindow(FindWindow(nil,"MyCaption")), но ничего не выходит. Подскажите...

← →
Ru © (2002-11-14 17:27) [1]

ParentHandle:=findwindow(nil,"ParentWindow");
ChildHandle:=findwindowex(Parentwindow,nil,"ChildWindow",nil);
//точнее смотри хелп
setactivewindow(ChildHandle);

← →
France (2002-11-14 17:37) [2]

Процедура заработала, но окно не активируется... Может еще кто что скажет?

← →
Ru © (2002-11-14 17:45) [3]

Функция SetActiveWindow
может поэтому:

function SetActiveWindow(Wnd: HWnd); HWnd;

Активизиpует окно веpхнего уpовня.

Паpаметpы:
Wnd: Идентификатоp окна.

Возвpащаемое значение:
Пpедыдущее активное окно.

функция находится в файле user32.dll

← →
Андрей Прокофьев © (2002-11-14 17:49) [4]

может, поможет
for i := 0 to MainForm.MDIChildCount - 1 do
if MainForm.MDIChildren[i].Caption = "XXX" then
begin
MainForm.MDIChildren[i].Show;
Exit;
end;
:))

← →
France (2002-11-14 17:54) [5]

Интересно то, что в обоих случаях при вызове этой процедуры главная форма теряет фокус!

← →
France (2002-11-14 17:59) [6]

Дите вставлено в основную форму как компонента, так что попробуйте SetFocus/SetFocusedControl.

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