|
|
|
как добавить в popup menu контрола дополнительные пункты ?
|
|||
|---|---|---|---|
|
#18+
Как добавлять в стандартное popup menu контроля дополнительные пункты ? При присвоении нового меню в свойстве PopupMenu, пункты стандартного меню больше не показываються ... Надо их создавать и дублировать самому ? Мне необходимо добавить для нескольких контролей один дополнительный пункт в PopupMenu. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.10.2002, 14:28:49 |
|
||
|
как добавить в popup menu контрола дополнительные пункты ?
|
|||
|---|---|---|---|
|
#18+
procedure AddNewMenuItem (pMenu : TPopupMenu); var Item : TMenuItem; begin Item := TMenuItem.Create(pMenu); Item.Caption := 'New Item'; Item.OnClick := SomeProc; pMenu.Items.Add(Item); end; ... AddNewMenuItem(Control1.PopupMenu); ... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.10.2002, 16:33:20 |
|
||
|
|
start [/forum/topic.php?fid=58&msg=32061222&tid=2119711]: |
0ms |
get settings: |
8ms |
get forum list: |
20ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
54ms |
get topic data: |
13ms |
get forum data: |
3ms |
get page messages: |
57ms |
get tp. blocked users: |
2ms |
| others: | 241ms |
| total: | 406ms |
| 0 / 0 |
