Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Список открытых окон в меню (MDI) [D5, Win2k]


Alexey Leonchik ©   (2004-06-30 04:14:00) 

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

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

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


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

Alexey Leonchik   (30.06.04 07:09)

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


Defunct   (2004-06-30 08:35:00) [2]

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 здесь - имя пункта главного меню, где будут располагаться формируемы пункты списка окон или чего-то там еще.


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

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

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


ЮЮ   (2004-06-30 06:39:00) [4]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо