Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Добавить пункт в чужое меню


Grinder ©   (2005-12-24 05:08:00) 

Как в контекстное меню чужой программы добавить пункт?
Или хотя б получить HANDLE этого меню.


френк   (2006-01-07 11:58:00) [1]

VirEx ©   (24.12.05 12:26) [2]
а как навесить на новый пункт меню обработчик? )


TUser   (2006-01-07 11:17:00) [2]

> контекстное

Увы, контекстное меню никакому окну не приписано - создалось через CreatePopupMenu и в любом окне может вывалиться через TrackPopupMenu. Учли надо встроится в меню проводника или ie - то это описано в msdn. Если в другую программу - ищи описание к ней, может и можно, а может нет.


Grinder   (2006-01-07 04:39:00) [3]

Спасибо.
Да чуть не то. Мне нужно добавить в контекстноеменю, а не системное.


VirEx   (2005-12-24 12:26:00) [4]

procedure TForm1.Button1Click(Sender: TObject);
var
SysMenu: THandle;
begin
SysMenu := GetSystemMenu(FindWindow(nil,PChar('Form1')), False);
AppendMenu(SysMenu, mf_SEPARATOR, 0, #0);
AppendMenu(SysMenu, mf_BYPOSITION, My_MenuItem, 'Новый пункт');
end;


GrayFace   (2005-12-24 10:06:00) [5]

GetSystemMenu, InsertMenuItem, а так же могут быть полезны другие функции из списка group в SDK


Наверх

Титульная страница Поиск, карта сайта Написать письмо