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

Меню дочерних форм   Найти похожие ветки 

 
MonoLife ©   (2010-03-12 08:02) [0]

Приветствую!
В MDI-приложении MainForm.WindowMenu, к примеру, равен N1 (TMenuItem).
К нему добавляются итемы открытых дочерних форм. Как найти эти динамические итемы?
N1.count показывает только количество итемов, созданных в дизайне.


 
И. Павел ©   (2010-03-12 08:53) [1]

А у меня все прекрасно работало, и Count увеличивался:

procedure TForm1.btn1Click(Sender: TObject);
var mi:TMenuItem;
begin
 mi := TMenuItem.Create(self);
 N1.Insert(N1.Count, mi);
 mi.Caption := "Новый пункт меню "+IntToStr(N1.Count);
 Caption:=N1.Items[N1.Count-1].Caption;
end;


 
MonoLife ©   (2010-03-12 09:06) [2]


> А у меня все прекрасно работало, и Count увеличивался

Если б я сам динамически добавлял пункты меню, тогда бы вопрос не возник.
Речь о дочерних окнах и автоматическом добавлении пунктов меню.


 
Amir   (2010-03-12 11:54) [3]

Никак иначе кроме как "поитемным" сравнением "своих" с "чужими"
А зачем это вообще-то нужно ?


 
MonoLife ©   (2010-03-12 15:00) [4]


> Никак иначе кроме как "поитемным" сравнением "своих" с "чужими"

Чтоб сравнить "свои" с "чужими" надо сначала эти "чужие" найти, чего я не могу)

> А зачем это вообще-то нужно ?

Хотелось присвоить их свойства кнопкам, чтоб не писать свои обработчики на активацию дочерних форм


 
Amir   (2010-03-12 16:40) [5]

>Хоте/лось присвоить их свойства кнопкам, чтоб не писать свои обработчики на активацию >дочерних форм

Что такое "обработчики на активациию дочерних форм" ?


 
MonoLife ©   (2010-03-12 16:50) [6]


> Что такое "обработчики на активациию дочерних форм" ?

то, что выполняется при клике на эти пункты меню - становится активной дочерняя форма, связанная с определенным итемом..


 
MonoLife ©   (2010-03-12 18:04) [7]

Я все время задаю вопросы на которые нет ответов(



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

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



Память: 0.46 MB
Время: 0.048 c
15-1273645654
uniken1
2010-05-12 10:27
2010.08.27
DoubleBuffer в чужом окне


15-1270040562
Начинающий маковод
2010-03-31 17:02
2010.08.27
Хакинтош на виртуальной машине на PC.


2-1272104034
Kukulkan
2010-04-24 14:13
2010.08.27
Изменение TGoupBox!


2-1265981290
Mestar
2010-02-12 16:28
2010.08.27
1C и Delphi


15-1273579414
ixen
2010-05-11 16:03
2010.08.27
ExeCryptor и Firebird




   Наверх