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

Вниз

Создание пунктов меню в runtime?   Найти похожие ветки 

 
XMblPb   (2002-12-01 15:23) [0]

Как создавать пункты главного меню в рантайм - необходимо реализовать пункт меню Recent document (недавно открытые документы)? Мастера, подскажите пожалуйста? Заранее благодарен за любую помощь...


 
LongIsland ©   (2002-12-01 15:38) [1]

procedure TForm1.Button1Click(Sender: TObject);
var
NewItem: TMenuItem;
begin
NewItem := TMenuItem.Create(mm);
try
NewItem.Caption := "Do this";
mm.Items[0].Insert(0, NewItem);
except
NewItem.Free;
ShowMessage("Блин, не вышло!");
end;
end;


Если у Items нет индекса, то добавляется пункт в верхнее меню


 
XMblPb   (2002-12-01 15:45) [2]

2LongIsland
Весьма и весьма благодарен!



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

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

Наверх




Память: 0.46 MB
Время: 0.018 c
3-36001
Лесник
2002-11-23 00:23
2002.12.12
как создать таблицу в M$ Access 2000 используя ADO


1-36242
Маришка
2002-12-02 08:44
2002.12.12
Вопрос


14-36414
XMblPb
2002-11-22 18:07
2002.12.12
Ошибка Undeclared identifier при чтении/записи ini-файлов.


1-36198
RazorbladE
2002-12-03 13:03
2002.12.12
Печать HTML страницы


1-36153
Darlock
2002-12-03 18:31
2002.12.12
Свойство TDataSet в компоненте