Координаты ОУ?

[Fainder]

Возможно у меня возникнут ещё вопросы подобные данному, также не исключаю, что эти вопросы с одной стороны ближе к выньапи, с другой - вопросы новичка.
1. Где находится область уведомлений? В тот момент, когда юзверь кликает по значку проги, находящемуся в области уведомлений, необходимо отобразить форму согласно координатам, которые я пока не знаю, как получить.
Несложно получить координаты панели задач в целом, но именно область уведомлений (трей) с координатами значка, на котором кликнул юзверь пока у меня вызывает проблемы.

[SkyM@n]

Не знаю, как проще окно по значку в трее, но предлагаю вот такой вариант. По крайней мере, он теоретически работает.
Область уведомлений=трей. Ищи средствами АПИ. FindWindow с по классу ToolBarWindow32. Чкрыто "кликая" по трею мышкой (а именно, используя ф-ции mouse_event/ShowCursor) автоматически отправляется мессаг в окно, к которому привязан данный значок в трее. А установив глобальный хук, принимай сообщения и фильтруй их в моменты, когда кликаешь по значку в трее. Если не нашел "своих" сообщений, то переходим к следующему окну итд. После того, как таким методом "наощупь" отловил нужное событие и нашео окно, применяешь АПИшную ShowWindow, чтобы его показать или делаешь с ним что хочешь...

[Fainder]

2SkyM@n: По идее должно получиться, я сам думал о чём-то подобном, но представь, сколько ресурсов будет на это уходить особенно на слабых машинах.
Нужно всего лишь вместо контекстного меню при щелчке по значку в ОУ показать форму, это меню заменяющую.

[Stilet]

Сообщение от Fainder

2SkyM@n: По
Нужно всего лишь вместо контекстного меню при щелчке по значку в ОУ показать форму, это меню заменяющую.

Прога твоя? Если да то просто обрабатывай нужное сообщение, которое передастся твоей проге по клику на твою иконку в трее.

[Fainder]

Прога твоя?

Да

обрабатывай нужное сообщение, которое передастся твоей проге по клику на твою иконку в трее.

не примите за ламерсво, как?

[SkyM@n]

Сообщение от Fainder

2SkyM@n: По идее должно получиться, я сам думал о чём-то подобном, но представь, сколько ресурсов будет на это уходить особенно на

Ну ресурсов уходить мало, на что им тратиться? Обьекты мы не создаем, а на поиск по дескрипторах и хук нам много не надо. Хотя этот вариант практически трудоемкий, но больше вариантов нет. Если бы это была твое пограмма -тады понятно. А известно имя программы или имя окна или класса окна, еще что-то?

[SkyM@n]

>Прога твоя?

Сообщение от Fainder

Да

Блииин.... А я тут ему всякие гадости предлагаю.. Ты если значок создаешь, то обработчик ставишь?

[mihali4]

Сообщение от Fainder

не примите за ламерство, как?

Да так же, как и для любого объекта на своей форме - OnMouseDown, ..Up

[Stilet]

Верно. Недавно тут уже был пример с треем, кажись, порули поиском, если не найдешь отпишись я скину.

Михалыч, ты не радуй его, это мы с тобой знаем откуда у OnMouseXXX Ноги ростут, а автор если конечно не воспользуется TTrayIcon или подобным компонентом так врядли поймет.

[mutabor]

Нужно всего лишь вместо контекстного меню при щелчке по значку в ОУ показать форму, это меню заменяющую.

синим цветом нужные тебе координаты

procedure TForm1.WMICON(var msg: TMessage);
var P : TPoint;
begin
 case msg.LParam of         // обработка обратных сообщений
 WM_RBUTTONUP:        //по нажатию левой клавиши, WM_RBUTTONUP по правой
  begin
   GetCursorPos(p);
   SetForegroundWindow(Application.MainForm.Handle);
   PopupMenu1.Popup(P.X, P.Y);
  end;
 //WM_LBUTTONDBLCLK : RestoreItemClick(Self); //как Default
 WM_LBUTTONUP : RestoreItemClick(Self); //как Default
 end;
end;