| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как добавить к PopUp меню пункты другого меню [D3, 95/98]
<code> © (2009-08-07 21:50:00)Есть Memo1 и PopUpMenu1. Как добавить пункты одного меню к другому и наоборот?
procedure TForm1.FormCreate(Sender: TObject);
var tm: TMenuItem;
begin
tm:=TMenuItem.Create(Form1);
tm.Caption:='ZZZZZZZ';
PopupMenu1.Items.Add(tm); // <-- OK
PopupMenu1.Items.Add( (Memo1.PopupMenu.Items.Items[0]) ); // <-- AV
PopupMenu1.Items.Add( (Memo1.PopupMenu.Items[0]) ); // <-- AV
end;
При попытке обратиться к Memo1.PopupMenu.Items.Items[0] вылезает ошибка. Что здесь неправильно?
<code> (2009-08-08 17:09:00) [1]Спасибо, разобрался.
TUser (2009-08-07 23:11:00) [2]Есть TForm1. Это такой класс, его у тебя скорее всего один экземпляр - Form1. На нет лежат PopupMenu1 и Memo1. Так?
Тогда: это меню и поле - свойства формы. У поля к тому же есть собственное меню, которое ты не создавал, но его за тебя сделали борланды. ОбращениеPopupMenu1в методе формы обозначает обращение к меню формы. Тудыты добавляешь пункт. А обращениеMemo1.PopupMenu1- это уже к полю, а точнее к его менюшке, куда ты ничего не добавлял. нету там пунктов, при попытке обратиться к ним ты получаешь AV.
| |
