Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Инструментальная панель

irq © (2003-06-27 11:26:00)

Здравствуйте! Как нажать кнопку на инструментальной панели с помощью SendMessage? Известен дескриптор инструментальной панели, дескриптор владельца инструментальной панели и индекс кнопки. Спасибо

Ян (2003-06-30 13:25:00) [1]

нужно получить идентификатор нужного пункта меню
//------------- N-номер пункта ---
MnuID:=GetMenuItemID(MnuHandle,N);
MnuHandle - хэндл того подменю в котором этот пункт
//-------------
sendmessage(WinHandle,WM_COMMAND,makewparam(MnuID,0),0);

для всплывающего меню не проверял,но отличий от обычного
быть не должно
Как сделать через ShortKey - самому интересно, пока не получилось. Теоретически надо получить таблицу акселераторов,
а потом TranslateAccelerator но как?

irq (2003-06-30 10:50:00) [2]

Спасибо за ответ. Проблема с ToolBar"ом на сегодняшний момент решена. Таким же способом, что Вы предложили. Думаю, что структура rect заполняется ерундой, по той причине, что данные запрашиваются из адресного пространства другого процесса. Я передаю координаты, напрямую указывая их (напрммер, (10, 10) - это 0 кнопка). Некрасиво, но что поделать.

Сейчас передо мной стоит еще одна непростая задача - выполнить
действия, связанные с пунктом всплывающего меню (TPopUp в Delphi) в чужой программе. Известные данные - ShortKey этого пункта и его индекс. Как решить задачу? Спасибо.

Ян (2003-06-30 09:56:00) [3]
var Point:Tpoint;
( HTB,WM_LBUTTONDOWN,MK_LBUTTON,longint(@Point)
var Point:Tpoint;
Rect:Trect;
begin
sendmessage(HTB,WM_LBUTTONDOWN,MK_LBUTTON,longint(@Point));
sendmessage(HTB,WM_LBUTTONup,0,longint(@Point));
//Point-координата в пределах нужной кнопки относительно тулбара
координаты кнопки можно вычислить через
sendmessage(HTB,TB_GETITEMRECT,Ibut,longint(@Rect));
HTB-хэндл тулбара, Ibut-индекс кнопки, но работает почему-то
только для своего окна. Для других Rect вычисляться упорно
не хочет.

Наверх

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