Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.11;
Скачать: CL | DM;

Вниз

Список открытых окон в меню (MDI)   Найти похожие ветки 

 
Alexey Leonchik   (2004-06-30 04:14) [0]

Здравствуйте уважаемые!

Подскажите пожалуйста, как сделать в основном меню, в меню [Окна] список открытых окон приложения. При помощи мастера получается, а как это сделать руками, на голой форме?

С уважением Алексей Леончик


 
ЮЮ ©   (2004-06-30 06:39) [1]

MainForm.WindowMenu := <MenuItem [Окна]>


 
Alexey Leonchik   (2004-06-30 07:09) [2]

Извините пожалуйста, так я уже пробовал :) Не работает. Список окон не создается. А можно поподробнее ...

С уважением Алексей Леончик


 
Defunct ©   (2004-06-30 08:35) [3]

procedure TForm1.Button1Click(Sender: TObject);
Var MenuItem: TMenuItem;
begin
 MenuItem := TMenuItem.Create(MainMenu1);

 With MenuItem Do
 Begin
   Caption := Button1.Caption;
   ... назначение событий, имени и т.п. если надо
 End;
 File1.Add(MenuItem);
end;


File1 здесь - имя пункта главного меню, где будут располагаться формируемы пункты списка окон или чего-то там еще.


 
Игорь Шевченко ©   (2004-06-30 10:25) [4]

Alexey Leonchik   (30.06.04 07:09)

Вставь в этот пункт меню команды Tile, Cascade...Список окон, AFAIK, не будет создаваться, если у этого меню нет ни одного элеиента.



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

Текущий архив: 2004.07.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.032 c
1-1088450980
Riant
2004-06-28 23:29
2004.07.11
TrackBar


3-1087303547
_mandrake_
2004-06-15 16:45
2004.07.11
Не устанавливается interbase :-(((


6-1084492318
Andrei82
2004-05-14 03:51
2004.07.11
Работа с HTML в Delphi


1-1088493877
Dysan
2004-06-29 11:24
2004.07.11
TXMLDocument в DLL?


3-1087301567
zevsus
2004-06-15 16:12
2004.07.11
Interbase(Firebird 1.5): Опустошение и репликация