Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > System Menu

Автор: z-END 29.3.2004, 21:06

Можно добавить в системное меню чужих окон свой элемент?

Автор: <Spawn> 30.3.2004, 05:02

Например так:

Код

procedure TForm1.Button3Click(Sender: TObject);
var
  wnd: HWND;
  Menu: HMENU;
begin
  wnd := FindWindow(<Класс окна нужного тебе процесса>, nil);
  Menu := GetSystemMenu(wnd, False);
  AppendMenu(Menu, MF_STRING,100, 'Привет!!!');
end;

Автор: z-END 31.3.2004, 23:01

<Spawn> и еще вопрос по той-же теме а как мне вставить еще и обработчик етой строки меню, (что-бы посылал в мою прогу хандл того окна в котором была нажата эта строчка меню)

Автор: <Spawn> 1.4.2004, 05:09

Думаю что это не совсем просто будет

Нужна действовать примерно так: Использовать хук не перехват WM_SYSCOMMAND, а затем в нужной проге правильно отреагировать на перехваченый мессадж))