|
Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply |
|
neweraser |
|
||||
Опытный Профиль Группа: Участник Сообщений: 598 Регистрация: 17.2.2008 Репутация: нет Всего: 6 |
Я наверное зачастил на форуме Ну хоть не скучно будет
Проблема вот в чем: Есть форма, которую собираюсь использовать как хинт из приложения, которое свернуто в трей. Вот код, если кому инетресно (в дальнейшем планирую размещать на ней свои компоненты:
Выглядит она вот так: Рисую и в правый нижний угол ставлю так:
Как сделать, чтобы эта подсказка "хвостиком" указывала на иконку приложения в трее, а не на правый нижний угол? ps. Я разделом не ошибся? А то во все по очереди пишу Это сообщение отредактировал(а) neweraser - 15.6.2018, 17:36 -------------------- Кто ищет, тот всегда найдет. |
||||
|
|||||
neweraser |
|
||||
Опытный Профиль Группа: Участник Сообщений: 598 Регистрация: 17.2.2008 Репутация: нет Всего: 6 |
В общем, пришел к выводу, что нужно найти хэндл или координаты иконки в трее, а потом уже от них отталкиваться.
Штатными средствами, как я понял, это сложно сделать, наткнулся на Cool Tray Icon, в котором есть функция
Но она возвращает только позицию курсора внутри иконки, и то если мышка наведена, правильно? Вот, кстати, тут обсуждалось http://forum.vingrad.ru/forum/topic-263233.html Потом набрел на класс, который вроде как может помочь, но как именно я пока не догоняю, наверное, пора спать. -------------------- Кто ищет, тот всегда найдет. |
||||
|
|||||
Romikgy |
|
|||
Любитель-программер Профиль Группа: Участник Клуба Сообщений: 7325 Регистрация: 11.5.2005 Где: Porto Franco Odes sa Репутация: 13 Всего: 146 |
находите ToolbarWindow32 , перебираете все окна GetWindowThreadProcessId(Wnd, @CurrentPID); находите пид процесса и сравниваете со своим ... совпадает, у окна берете координаты и отрисовываете свое окно по координатам Это сообщение отредактировал(а) Romikgy - 16.6.2018, 23:27 -------------------- Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности. |
|||
|
||||
neweraser |
|
||||||||||
Опытный Профиль Группа: Участник Сообщений: 598 Регистрация: 17.2.2008 Репутация: нет Всего: 6 |
Romikgy, не выходит так.. сейчас приведу код с комментариями:
В мемо загружается вот это:
-------------------- Кто ищет, тот всегда найдет. |
||||||||||
|
|||||||||||
neweraser |
|
||||
Опытный Профиль Группа: Участник Сообщений: 598 Регистрация: 17.2.2008 Репутация: нет Всего: 6 |
Блин. Я уже согласен использовать любой компонент, что угодно. Столько времени потерять. Ну или хотя бы найти координаты трея?
Если рисую форму по этим
то она оказывается вообще в верхнем левом углу -------------------- Кто ищет, тот всегда найдет. |
||||
|
|||||
neweraser |
|
|||
Опытный Профиль Группа: Участник Сообщений: 598 Регистрация: 17.2.2008 Репутация: нет Всего: 6 |
Немного косякнул, для трея надо так:
А вообще сейчас пробую через Cool Tray Icon по функции TrayIcon.SetFocus отловить хэндл сфокусированной иконки Это сообщение отредактировал(а) neweraser - 18.6.2018, 14:10 -------------------- Кто ищет, тот всегда найдет. |
|||
|
||||
neweraser |
|
|||
Опытный Профиль Группа: Участник Сообщений: 598 Регистрация: 17.2.2008 Репутация: нет Всего: 6 |
Нашлось решение, может кому пригодится. В сети действительно очень много вопросов по этому поводу, но работающего кода я так и не нашел. Жаль, что не получилось без сторонних компонентов, хотя можно покопаться в исходниках Cool Tray Icon и отталкиваться оттуда. Но, так как я и так использую у себя в проекте этот компонент - мне не за чем
Привожу код:
Со стандартной темой windows (NT) не работает Это сообщение отредактировал(а) neweraser - 19.6.2018, 18:01 -------------------- Кто ищет, тот всегда найдет. |
|||
|
||||
Правила форума "Delphi: WinAPI и системное программирование" | |
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply. |
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |