powered by simpleCommunicator - 2.0.54     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / POPUP и treeview
2 сообщений из 2, страница 1 из 1
POPUP и treeview
    #36632443
_usa__83_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
День добрый!

Вот такая проблема. Сделал контекстное меню (из examples) и "прицепил" к treeview. Меню
отображается при нажатии правой кнопки (справа и снизу от координат нажатия клавиши). Если
ткнуть вне меню на пункитрное изображение ветви узла имеющего дочерний (свернутого) то меню
пропадает (как и должно быть) но одновременно раскрывается свернутый узел, ПРИЧЕМ обработчик
СОБЫТИЯ "Expand" узла не вызывается, в чем тут проблема?
...
Рейтинг: 0 / 0
POPUP и treeview
    #36632526
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
_usa__83_День добрый!

Вот такая проблема. Сделал контекстное меню (из examples) и "прицепил" к treeview. Меню
отображается при нажатии правой кнопки (справа и снизу от координат нажатия клавиши). Если
ткнуть вне меню на пункитрное изображение ветви узла имеющего дочерний (свернутого) то меню
пропадает (как и должно быть) но одновременно раскрывается свернутый узел, ПРИЧЕМ обработчик
СОБЫТИЯ "Expand" узла не вызывается, в чем тут проблема?

Может вам стоит воспользоваться методом HitTest?
Что-то типа этого:
Код: plaintext
1.
2.
3.
loNode = THIS.Object.HitTest(x * THISFORM.nTwipX, y * THISFORM.nTwipY)
IF TYPE("loNode") = "O" AND !ISNULL(loNode)
...
ENDIF
Свойства THISFORM.nTwipX и THISFORM.nTwipY заполняются в Init класса формы через:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
LOCAL liHDC
WITH THISFORM
	DECLARE INTEGER GetActiveWindow IN WIN32API
	DECLARE INTEGER GetDC IN WIN32API INTEGER iHDC
	DECLARE INTEGER GetDeviceCaps IN WIN32API INTEGER iHDC, INTEGER iIndex
	DECLARE INTEGER ReleaseDC IN WIN32API INTEGER hWnd, INTEGER iHDC

	m.liHDC = GetDC(.HWnd)
	.nTwipX =  1440 /GetDeviceCaps(liHDC, 88 )
	.nTwipY =  1440 /GetDeviceCaps(liHDC, 90 )

	ReleaseDC(.HWnd, m.liHDC)
ENDWITH
С уважением, Алексей
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / POPUP и treeview
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]