Вниз
Скачать: CL | DM;

Popup menu   Найти похожие ветки 

← →
acsoft ©   (2005-05-22 14:30) [0]

Есть объект на форме PopupMenu1, например. Есть Memo. Как добавить в стандартное меню этого Memo строки PopupMenu1?


← →
Marser ©   (2005-05-22 14:36) [1]

for i:=0 to popupmenu1.items.count-1 do
memo1.lines.add(popupmenu1.items[i].caption)


← →
acsoft ©   (2005-05-22 21:16) [2]

Не в текст Memo, a в его стандартное PopupMenu... ну, в котором пункты "Вырезать", "Копировать", "Вставить" и т.д.


← →
acsoft ©   (2005-05-22 21:28) [3]

Вопрос короче в том, как объединить два меню

memo1.Popupmenu.Items.Add(popupmenu1.Items[0]) не работает....
:(


← →
Eraser ©   (2005-05-22 21:31) [4]

acsoft ©

А разве "пользовательское" (своё) меню не заменяет "стандартное"?


← →
Marser ©   (2005-05-22 21:59) [5]

Memo1.PopupMenu:=PopupMenu1.


← →
acsoft ©   (2005-05-22 22:27) [6]

Заменяет.
Memo1.PopupMenu:=PopupMenu1 - именно это и делает...
А нужно объединить.

Вообще история такая. У меня в программе есть таблица. Я сделал меню новое с пунктами Добавить ячейки, Удалить ячейки. Но теперь нет возможности нормально редактировать текст в ячейках (по правой клавише мыши выскакивает новое меню, и нет пунктов Вставить, вырезать и т.д.) Не хочется постоянно переключать меню... как бы объединить?...


← →
Anatoly Podgoretsky ©   (2005-05-22 22:33) [7]

Забудь, не ты первый.


← →
Ученик   (2005-05-22 22:43) [8]

>acsoft ©   (22.05.05 22:27) [6]
Можно создать наследника TPopupMenu или TPopupActionBar, в который при созданию входят пункты меню редактирования.


← →
acsoft ©   (2005-05-23 11:11) [9]

>Anatoly Podgoretsky ©   (22.05.05 22:33) [7]
Судя по найденному Яндексом, это действительно безнадежно.

>Ученик   (22.05.05 22:43) [8]
У меня такое ощущение, что все дело в том, что стандарное меню просто не существует, пока его не вызвали, т.е. оно каждый раз создается заново по клику мышью, так что не получится никак добавлять пункты, даже описав наследника.

Короче проще будет все в одно меню и прописать заново вставку из буфера и вырезание... а может меню все же подменять. Ладно, спасибо всем



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.023 c
6-1111504222
Alpine
2005-03-22 18:10
2005.06.06
Работа с модемом !


14-1116425627
Maverick
2005-05-18 18:13
2005.06.06
Каким инсталятором вы пользуетесь?


4-1113647803
HDD
2005-04-16 14:36
2005.06.06
Можно ли из Delphi напрямую обратиться к жесткому диску


9-1110490520
SergeyR
2005-03-11 00:35
2005.06.06
User Interface


14-1116628398
Германн
2005-05-21 02:33
2005.06.06
"Обсуждение закрыто" - что это значит?




   Наверх