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

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

 
zenaev   (2004-02-17 09:32) [0]

Плиз, подскажите, пожалуйста, как узнать индекс активной MDIChild


 
Семен Сорокин ©   (2004-02-17 09:54) [1]

for _i := 0 to MDIChildCount-1 do
if MDIChildren[_i] = ActiveMDIChild then begin
// Нашли :)
Break
end;


 
zenaev   (2004-02-17 10:17) [2]

Мы тож самое и делали, только с While do, чего то не получилось
Сейчас еще раз попробуем
Спасибочки, что не оставили без внимания...


 
zenaev   (2004-02-17 10:41) [3]

Попробовали,не получается... условие MDIChildren[_i] = ActiveMDIChild выполняется сразу на первой форме, почему не знаем, и поэтому добраться до истинно активной не получается


 
Mur_r   (2004-02-17 10:42) [4]

Наверное, это все-таки дельфийный глюк... или из-за того, что у них все одинаково, кроме места в памяти... хотя вряд ли:)
Прошел вариант с записью индекса формы в свойство Tag дочерней формы и сравнении его
if MDIChildren[i].tag = ActiveMDIChild.tag


 
Юрий Зотов ©   (2004-02-17 10:48) [5]

> Mur_r (17.02.04 10:42) [4]
> Наверное, это все-таки дельфийный глюк...

Если это и глюк, то уж точно не дельфишный. F1.

The order of MDI children changes as different MDI forms are activated.

Whenever an MDI child is activated, however, it moves to the front of the list.


 
Семен Сорокин ©   (2004-02-17 10:50) [6]

может тогда просто проверять на MDIChildren[_i].Focused?


 
Плохиш   (2004-02-17 10:52) [7]


> Семен Сорокин © (17.02.04 10:50) [6]
> может тогда просто проверять на MDIChildren[_i].Focused?

Вы думаете the front of the list - окно которое не имеет фокуса?


 
Семен Сорокин ©   (2004-02-17 10:56) [8]

Плохиш (17.02.04 10:52) [7]
Вы думаете the front of the list - окно которое не имеет фокуса?

уже посмотрел, согласен.


 
zenaev   (2004-02-17 11:13) [9]


> Прошел вариант с записью индекса формы в свойство Tag дочерней
> формы и сравнении его
> if MDIChildren[i].tag = ActiveMDIChild.tag

Странноватый вариант... Но он работает! Премного благодарны.



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

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



Память: 0.46 MB
Время: 0.017 c
14-94140
Ru
2004-02-04 09:34
2004.02.29
Опрос общественного мнения ;)


1-93919
Urvin
2004-02-14 21:14
2004.02.29
TScrollBox


6-94076
Yaro
2003-12-23 04:54
2004.02.29
Сетевые девайсы и их адреса...


14-94144
Budy
2004-02-07 01:29
2004.02.29
FreePascal, что это?


1-93846
Budy
2004-02-16 17:13
2004.02.29
Панелька из Paint а




   Наверх