Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.09.22;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Основная";
Текущий архив: 2003.09.22;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.01 c
14-71945
BizonWar
2003-09-01 17:30
2003.09.22
С Суприма уже весь рунет прикалывается.


14-71883
Soft
2003-09-03 16:11
2003.09.22
Конкурс Гениев


1-71576
DVE
2003-09-10 09:55
2003.09.22
Каков механизм сохранения объекта в файл


3-71494
Berezne
2003-09-01 13:09
2003.09.22
Возможно ли добавить поле к таблице


1-71602
Sharik_212
2003-09-09 15:27
2003.09.22
Хинт или альтернатива.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский