PopupMenu для Edit

← →
Демонов Е.В. (2002-10-23 11:20) [0]

Подскажите каким образом можно изменить стандартное контексное меню для Edit при помощи API?

← →
gek (2002-10-23 11:22) [1]

Положи на форму PopUpMenu

← →
GreatMaster (2002-10-23 11:24) [2]

как изменить существующее мы не знаем, но чтобы вскакивало своё PopupMenu а не системное, можно вроде бы так
procedure TForm1.Edit1ContextPopup(Sender: TObject; MousePos: TPoint; var Handled: Boolean); begin Handled:=true; end;

← →
GreatMaster (2002-10-23 11:27) [3]

Блин... извини, генацвале, я немного перепутал. То что я сказал - это чтобы ваще системный контекст зарубить (и ч/з клаву тоже)

← →
Демонов Е.В. (2002-10-23 11:57) [4]

Нет... не то. мне нужно взять то контексное меню которое есть и добавить туда свои пункты . для этого нужно получить дескриптор энтого меню а потом insertmenu appendmenu и т.д.
Так вот как получить этот дескриптор - я что то не понимаю.

У формы его получаю с помощью GetSystemMenu.

А С Edit не катит.
ПОМОГИТЕ.

← →
Демонов Е.В. (2002-10-23 12:22) [5]

А вроде слыхал что тут мастера водятся. !?

← →
Alex4444444444 (2002-10-23 12:22) [6]

Может, попробовать перехватить WM_INITMENU или WM_INITPOPUPMENU?
В прочем, для TEdit я сам не пробовал.

← →
Игорь Шевченко (2002-10-23 12:40) [7]

Демонов Е.В. © (23.10.02 12:22)

> А вроде слыхал что тут мастера водятся. !?

Ошибся

← →
Демонов Е.В. (2002-10-23 12:42) [8]

Не ну серьёзно может кто знает ?
как получить дескриптор контексного меню для далнейших с ним манипуляций ?

← →
Демонов Е.В. (2002-10-23 13:04) [9]

Ну и...

← →
Демонов Е.В. (2002-10-23 14:11) [10]

Ну ниверю чтоникто не знает.

← →
Arcus (2002-10-23 15:01) [11]

to Демонов Е.В.

см. сообщение от Alex4444444444
"...перехватить WM_INITMENU или WM_INITPOPUPMENU..."
Перехватывали? Из хелпа к этому сообщению:
...
WM_INITMENUPOPUP
hmenuPopup = (HMENU) wParam;
...

← →
Демонов Е.В. (2002-10-23 15:09) [12]

Arcus © (23.10.02 15:01)
Что то не соображу как перехватить не потомка же писать.
Подскажите.
А что действительно нет какой нибудь функции ?

← →
Arcus (2002-10-23 17:51) [13]

Разве что через Hook на сообщения?

← →
Nick N A (2002-10-27 08:42) [14]

Ох и мучения бывают у людей

Edit1.PopUpMenu:=PopUpMenu1; //(через ObjectInspector)

← →
Cobalt (2002-10-27 14:05) [15]

>Nick N A (27.10.02 08:42)
>
>Ох и мучения бывают у людей
>Edit1.PopUpMenu:=PopUpMenu1; //(через ObjectInspector)

Полность согласен - намного проще в реализации, чем то, что вам предлагали(но оно вам, видимо, еще не под силу)

← →
Alex4444444444 (2002-10-27 17:08) [16]

Ne ochevidno. Vo-pervyh, nestandartnoe menu vyglyadit neaccuratno. Ya dolgo bilsya, poka nauchilsya ostavlyat" v TEdit standartnoe menu ne vziraya na PopupMenu u TParent. Vo vtoryh, pridetsya zhe ego obrabatyvat", i ne ochevidno, chto eto dast menshe coda.

PopupMenu для Edit Найти похожие ветки