Вниз
Скачать: CL | DM;

Активное 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]

>> Андрей Прокофьев © (14.11.02 17:49)
А вот это работает!!! Спасибо!!!


← →
han_malign ©   (2002-11-14 18:03) [7]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
1-14599
Юлия
2002-11-24 13:08
2002.12.05
Отмена действия


1-14637
UserL
2002-11-25 11:30
2002.12.05
TStack


1-14527
sers
2002-11-26 16:01
2002.12.05
Защита своих исходников


1-14620
HanIP
2002-11-22 16:13
2002.12.05
Delphi 5


3-14457
bigbill
2002-11-18 00:15
2002.12.05
Query с CD-ROM а




   Наверх