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

Что я делаю не так с меню?   Найти похожие ветки 

← →
asJIura   (2003-09-08 23:09) [0]

Есть форма Form1-TMdiForm.Есть дочерняя Form2.
Form1 стоит в AutoCreate Forms,Form2 в Available Forms.
на главную форму кидую меню Делаю два пункта>Окна(N1) Создать(N2)
Главной форме в меню WindowMenu даю N1.
В коде меню создать пишу:

procedure TForm1.N2Click(Sender: TObject);
Var
FFF:TForm2;
Begin
FFF:=TForm2.Create(Application);
fff.Caption:="kkk";
end;

По идее должна создаться дочерняя форма (она и создается :) и ее название появиться в меню окна.Но оно не появляется.почему?

---

← →
Юрий Зотов ©   (2003-09-09 02:32) [1]

А с чего это вдруг ее название должно появиться в меню "окна"? Само по себе, что ли?

Так не бывает. Или добавляйте пункт меню ручками, или используйте предопределенные меню (клик правой кнопкой в редакторе меню - Insert From Template - Window Menu).

---

← →
Proton ©   (2003-09-09 08:11) [2]

2asJIura
у n1 должен быть хотябы один подпункт, напрмер "свернуть все".

---

← →
Radionov Alexey ©   (2003-09-09 08:22) [3]

1. WindowMenu дожен иметь подменю.
2. Form2 должна иметь стиль MDIChild

---

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

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



Память: 0.45 MB
Время: 0.015 c